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LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 
3 COPY LOG7AF9 ** MAP EC HISTORY ** 002500 2570 198 A (ENTPT) POINT TO MAP ENTRY POINT TABLE 
TET eTCS SLOSS OCS SCS OSCOSLLSSS SSC SSSOCSS SC CSCLCSSCSCSCC£S SSCS CSSLS SSCS SS SSS Se S SS 2 2S YQ RR He He eR a ee a He a eK a ee he Be ee a a a a oe a 2 2 ke a 2 a a ke a ak a fe ic ak fe ate ak of 2k ic ak ak 
i ae * 200 3 I OI III II IK IO III III IK OR I BOR II I a fe ake 2k 2 ic 2 akc a 
6 * KK PREREQUISITES * KX * 201 ** * * 
7 * * 202 ** THE FOLLOWING TABLES ARE USED BY THE MDI SUPERVISOR fp oeee * 
8 * NONE * 203 ** TO LOCATE THE CORRECT RULE TO INVOKE, TO OBTAIN THE PROPER «x 
9 * * 204 ** PARAMETERS TO PASS TO THE TU'S AND TO PASS TO THE OPERATOR * 
10 3 IRI I IO BOOK CIR I i i ok i kk akok ak 205 ** THE INDICATED MESSAGE(S). THERE ARE FOUR TABLES USED FOR THIS * 
11 * * 206 ** PURPOSE THEY ARE: OK 
12 * ial MODIFICATIONS *K * 207 ** * 
13 * * 208 ** STEP AND RULE ADDRESS TABLE ** 
14 * NONE * 209 ** THIS TABLE GIVES THE ADDRESS OF THE RULE TO INVOKE AND ** 
15 * * 210 ** THE ASSOCIATED STEP DECIMAL STEP NUMBER OF THAT RULE. ** 
16 3k OR aC cok goto cok ek 2 Rak RR ER ok i tk ik ae oie teak ok 211 ** ENTRIES ARE AS FOLLOWES a 3k 
17 * * 212 ** A AN ADDRESS OF THE RULE DC START AREA ** 
18 * KX REA'S INCORPORATED KK * 213 ¥** B THE STEP NUMBER IN DECIMAL ** 
19 * * 214 ** Cc AN EQUATE FOR THE STEP NUMBER ** 
20 * NONE * 215 ** *x 
21 * x 216 ** RULE INFORMATION TABLE *K 
22 3k KO I I I IC I dak ok a ak ak ak ie aka ak 217 ** THIS TABLE CONTAINES THE REQUIRED INFORMATION TO EXECUTE * x 
23 * * 218 ** THE APPROPRIATE RULE UNDER MDI. EACH RULE HAS ITS OWN ** 
24 * KK SPECIAL INSTRUCTIONS eax * 219 ** UNIQUELY DEFINED AREA INDICATED BELOW. END OF TABLE IS * 
25 * * 220 ** INDICATED WITH A X*OO00" FOR THE RULE EQUATE. ** 
26 * NONE * 221 ** es 
27 * *x 222 ** SQUES * x 
28 2K KK IO IC KK a OK IK I I RO ok kkk dk kk i tok ak 223 ** A) RULE EQUATE xX*'0100! ok 
29 x * 224 ** B) ADDRESS OF THE YES LEG RULE ** 
30 * * KX E. C. HISTORY KK * 225 ** ** 
31 * * 226 ** SFIXT ok 
32 * DATE 10JAN79 DATE DATE DATE * Za) A) RULE EQUATE X'0101' * 
33 : EeC. 375222 E.C. E.C; E.C. * aoe be B) ADDRESS OF MESSAGE TO PRINT Pipi 
* 
35 FORO RIOR III ICI a I rr I IO ga a tak ak ak gator kk ak feok 2k afeaie 2 230 ** $STOP ok 
002500 37 I7AF9 START X*'2500! START ADDRESS OF ALL 'I' TYPE PROG 231 ** 5} RULE EQUATE X'0102' Ok 
000100 38 @QUES EQU x'0100! EQUATED VALUE FOR MDI STATEMENT 232 ** B) ADDRESS OF MESSAGE er 
000101 39 OFIXT EQU Xx'0101' EQUATED VALUE FOR MDI STATEMENT 233 ** * 
000102 40 @STOP EQU xX'0102! EO oaaEe VALUE FOR MDI STATEMENT 234 ** SGOTO * 
000200 41 @GOTO EQU X*0200° EQUATED VALUE FOR MDI STATEMENT 235 ** A) RULE EQUATE X!0200! OK 
000201 42 @CALL EQU X'0201' EQUATED VALUE FOR MDI STATEMENT 236 ** B) ADDRESS OF MESSAGE ok 
000300 43 @INPT EQU X'0300' EQUATED VALUE FOR MDI STATEMENT 237 ** C) NAME OF MAP TO GO TO ok 
000400 44 @QUXX EQU X'0400! EQUATED VALUE FOR MDI STATEMENT 239. ** D) ENTRY POINT WITHIN GO TO MAP TO USE * 
000500 45 @TUXXx EQU X¥'0500! EQUATED VALUE FOR MDI STATEMENT 2359. S* E) INDICATOR FOR EXTERNAL OR INTERNAL REFERENCE *% 
000600 46 @NVLD EQU X'0600! EQUATED VALUE FOR MDI STATEMENT 241 ** eX 
000000 47 EQ EQU x'0000! EQUATE FOR EQUAL 242 ** SCALL * % 
000004 48 NE EQU X'OOO4! tas FOR NOT EQUAL 243 ** A) RULE EQUATE x'0201' a 
000008 49 HI EQU X'OO08! EQUATE FOR HIGH 244 ** B) ADDRESS OF MESSAGE OK 
00000C 50 NH EQU X'OOO0C! EQUATE FOR NOT HIGH 245 ** C) NAME OF MAP TO CALL OK 
000010 51 LO EQU X*0010! EQUATE FOR LOW 246 ** D) ENTRY POINT WITHIN CALLED MAP TO USE * 
000014 52 NL EQU X'OO14! tas FOR NOT LOW 247 ** E) INDICATOR FOR EXTERNAL OR INTERNAL REFERENCE * 
000010 53 LT EQU X*0010! EQUATE FOR LESS THAN 248 ** *x 
00000C 54 LE EQU x*OO0C! EQUATE FOR LESS THAN OR EQUAL TO 249 ** SINPT * 
000008 55 GT EQU X*'O0008' EQUATE FOR GREATER THAN 250 ** A) RULE EQUATE x't0300' * x 
000014 56 GE EQU X'0014! EQUATE FOR GREATER THAN OR EQUAL TO 251 ** B) INPUT TYPE Ue ae OR HEX) eK 
000200 57 ON EQU X*'0200! EQUATE FOR ON 252 ** C) ADDRESS OF EG RULE aK 
000202 58 OF EQU X'0202' EQUATE FOR OFF 253 ** D) DESTINATION LOCATION OF INPUT DATA ** 
000204 59 MX EQU X'0204! EQUATE FOR MIXED 254 ** E) LENGTH OF INPUT DATA eK 
000000 60 EBC EQU X*O000! EQUATE FOR EBCDIC DATA TRANSFER 255 ** F) LOWER LIMIT OF GOOD DATA x 
000001 61 HEX EQU Xx'Q001' EQUATE FOR HEX DATA TRANSFER 256 ** G) HIGHER LIMIT OF GOOD DATA *x 
000001 62 XTRNL EQU xX*'0001' EQUATE FOR EXTERNAL REFERENCE 257 ** ok 
000000 63 INTRNL EQU Xx'O0000! EQUATE FOR INTERNAL REFERENCE 258 ** SQUXX abe 
000000 64 PARM EQU xX*O000! EQUATE INDICATING PARAMETER 259 ** A) RULE EQUATE X*O4OO! 2K 
000001 65 DA EQU X'*QOOT! EQUATE FOR DEVICE ADDRESS 260 ** B) ADDRESS OF YES LEG BUTE * 
000002 66 UA EQU X'0002' oun Te FOR UNIT ADDRESS 261 ** C) TU BRANCH TO ADDRESS ITIAL b) * 
000000 67 DUMMY EQU x'0000' DUMMY our 262 ** D) TU BRANCH TO ADDRESS CON QF Y) ** 
001800 69 PID EQU *-X'QDOO! ADDRESS OF MDI HEADER 263 ** E) LENGTH OF PARAMETER I YTES * 
000232 70 PTYPE EQU *-X'22CE! ADDRESS OF PROCESSOR TYPE FIELD 264 ** F) PARAMETER TO PASS TO ru * x 
00180C 71 STEPNUM EQU PID+X'QOOC' ADDRESS OF DECIMAL STEP NUMBER 265 ** G) STORE ADDRESS FOR FIRST 8 WORDS OF PARAMETER * x 
00180E 72 OPWD1 EQU PID+X'QOOE' ADDRESS OF OPTION WORD ONE 266 ** *x 
001810 73 OPWD2 EQU PID+X'0010! ADDRESS OF OPTION WORD TWO 267 ** STUXX *k 
001818 74 TUSTATUS EQU PID+xX'0018! ADDRESS OF TU STATUS WORD 268 ** A) RULE EQUATE x'0500! a 
OO181A 75 TUWORK OU PID+X'OOTAt ADDRESS OF TU WORK AREA 269 ** B) ADDRESS OF YES LEG RULE ** 
Q00189A 76 TUPARM1 EQU PID+X'OOQA' ADDRESS OF PARM 1 POINTER 270 ** C) TU BRANCH TO ADDRESS * 
00189C 77 TUPARM2 EQU PID+X*QO9C! ADDRESS OF PARM 2 POINTER 271 ** D) TYPE OF COMPARE TO MAKE ON RESULTS * 
00189E 78 TUPARM3 EQU PID+X'OO9E* ADDRESS OF PARM 3 POINTER 272 ** E) LENGTH OF COMPARED RESULTS ** 
0018A0 79 TUPARMY EQU PID+X"OOAO! ADDRESS OF PARM 4 POINTER 273 ** F) MASK FIELD FOR COMPARE ** 
0018A2 80 TUPARMS EQU PID+X*QOOA2' ADDRESS OF PARM 5 POINTER 274 ** G) LENGTH OF PARAMETER IN BYTES ** 
OOT8A4 81 TUPARM6 EQU PID+X"OOA4! ADDRESS OF PARM 6 POINTER 275 ** H) PARAMETER TO PASS TO THE TU ** 
0018A6 82 TUPARM7 EQU PID+X'QOA6! ADDRESS OF PARM 7 POINTER 276 ** I) STORE ADDRESS FOR FIRST 8 WORDS OF PARAMETER ** 
0018A8 83 TUPARM8 EQU  PID+X'OOAS8® ADDRESS OF PARM 8 POINTER 2] ] ** 1+ 
OO18AA 84 TUPARM9Y EQU PID+X'OOAA' ADDRESS OF PARM 9 POINTER 278 ¥** SNVLD * 
0018AC 85 TUPARM10 EQU PID+X*QOOAC* ADDRESS OF PARM 10 POINTER 2719 ** A) RULE EQUATE X*0600! ek 
OO18AE 86 TUPARM11 EQU PID+X'OOAE* ADDRESS OF PARM 11 POINTER 251 -** * 
0018B0 87 TUPARM12 EQU PID+X'QOOBO' ADDRESS OF PARM 12 POINTER 282 ** ENTRY POINT TABLE ** 
0018B2 88 TUPARM13 EQU PID+X'OOB2'* ADDRESS OF PARM 13 POINTER 283 ** THIS TABLE CONTAINS THE ENTRY POINTS WITHIN THE MAP THAT * * 
0018B4 89 TUPARM14 EQU PID+X*QOOB4! ADDRESS OF PARM 14 POINTER 284 ** THE MAP CAN BE ENTERED FROM THESE ENTRY POINTS ARE * 
0018B6 90 TUPARM15 EQU PID+X'OOB6! ADDRESS OF PARM 15 POINTER 285 ** REFERENCED BY NAME AND ADDRESS. ENTRIES ARE AS FOLLOWES: * 
0018B8 91 TUPARM16 EQU PID+X'OOBS8' ADDRESS OF PARM 16 POINTER 286 ** 2 k 
QO18BA 92 TUMSGWTR EQU PID+X'OOBA' ADDRESS OF -> TO COMMON MSG WRITER 287 ** A) NAME OF ENTRY POINT * 
OO18BE 93 TUUA ath PID+X'OQOBE' ADDRESS OF UNIT ADDRESS IN EBC 288 ** B) ADDRESS OF ENTRY POINT RULE TABLE * 
0018C0 94 TUDA EQU PID+xX"OQOCO! ADDRESS OF DEVICE ADDRESS IN EBC 289 ** ok 
0018C2 95 TUBUFF EQU PID+X'QOC2' ADDRESS OF LAST USED WORD IN MAP 290 ** THE ENTRY POINT TABLE END IS INDICATED BY A xX*0000! * * 
0018C4 96 TULAST sty PID+X'OOC4! ADDRESS OF LAST ADDRESSABLE WORD 291 ** * 
0018C6 97 TURESULN EQU PID+xX'QOC6! ADDRESS OF LENGTH OF TU RESULTS 292 ** MESSAGE TABLE * 
0018C8 98 TURESUL EQU PID+X'OO0C8! ADDRESS OF TU RESULTS FIELD 293 ** THIS TABLE CONTAINES THE MESSAGE PASSED TO THE OPERATOR ** 
0018FC 99 MAPNAME' EQU PIDtX*OOFC' ADDRESS OF MAP NAME FIELD IN HEX 294 ** VIA THE MDI SUPERVISOR. THE TABLE IS AS FOLLOWES: ** 
001948 100 TUINPT EQU PID+X'O148! ADDRESS OF $INPT DATA 295 ** * 
00196E 101 PARMARA EQU PID+X'O16E' ADDRESS OF $INPT INPUT AREA 296 ** A) EQUATE FOR START OF MESSAGE BLOCK * 
0019B8 102 @DCADD1 EQU PID+X'O1B8! MDI POINTER 297 ** B) NUMBER OF LINES OF MESSAGE * OK 
OO19BA 103 @DCADD2 EQU PID+X'O1BA' MDI POINTER 298 ** C) LENGTH OF FOLLOWING LINE ** 
0019C4 104 SUPSTAT EQU PID+X'O1C4! ADDRESS OF MDI STATUS 299 ** D) FIRST LINE OF MESSAGE ** 
0019D0 105 DEVADD EQU PID+X'O1D0! ADDRESS OF DEVICE ADDRESS TABLE 0 300 ** E) LENGTH OF FOLLOWING LINE * 
OO19DA 106 DEVADD1 tty PID+X'O1DA'* ADDRESS OF DEVICE ADDRESS TABLE 1 301 ** F) SECOND LINE OF MESSAGE * * 
0019E4 107 DEVADD2 EQU PID+X'O1E4! ADDRESS OF DEVICE ADDRESS TABLE 2 302 ** G) ETC. * 
OO19EE 108 DEVADD3 EQU PID+X"O1EE! ADDRESS OF DEVICE ADDRESS TABLE 3 303 ** * Ok 
0019F8 109 DEVADD4 EQU PID+X'O1F8! ADDRESS OF DEVICE ADDRESS TABLE 4 304 2K AOR OO III OI IO RR IR IOI AR IR ROI RO FOR ak 
001A02 110 DEVADDS EQU PID+xX'0202! ADDRESS OF DEVICE ADDRESS TABLE 5 305 3 RIO IOI ICI ICI II IIR RIOR IR ICI IO IOI RIOR IC HOI 
001A0C 111 DEVADD6§ EQU PID+tX*'O20C' ADDRESS IF DEVICE ADDRESS TABLE 6 
001A16 6 DEVADD7 i Us Fae ADDRESS OF DEVICE ADDRESS TABLE 7 
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308 2 ROI IO IOI IO RIO IOI ISI OI IO OO III I I i gal kaiok oie toto kak ak 0025B4 0001 422 DC Tae 
309 eR ORO OR OR I OR ROR IO IO OR IOI IOI IOI ROR ICI II IRC ki akc ak 0025B6 OO1C 423 DC se 28) 
310 OK * 0025B8 E6D9C9E3C5S4YOCHCIE net phape aa CLOO28*WRITE DATA OR FORMAT CORRECT! 
** STEP AND RULE ADDRESS TABLE ** 
312 ** OK 0025D4 0000 Y27+OPTN1 DC X*0000! PROGRAM OPTION CONTROL WORD 1 
313 [OIC OR IIR IE IO rr IOI IK 2 Ok IOI Fok kk ak ak 428+% 
314 ok RIOR IOI IORI OI I ICO IO II IO ko kak aiok ak 0025D6 0000 429+OPTN2 DC Xx*Q000! PROGRAM OPTION CONTROL WORD 2 
002502 2520 315 DC ue te ose 430+* BIT HEX 
002504 0001 316 DC "0001 000010 431+B48 EOU 16 0 8 PROBLEM PROGRAM CONTROL BITS 
000001 317 EQNO0001 EQU 0001 000011 432+B49 EQU 17 1 4 % 
002506 2524 318 DC AL2 (N00002) 000012 433+B50 EQU 18 2 2 * THESE BITS ARE USED WITH THE 
002508 0002 319 DC XL2°0002! 000013 434+B51 EQU 19 3 1 * SECOND OPTION WD AND ARE TO 
000002 320 EQN00002 EQU 0002 000014 435+B52 EQU 20 4 8 * BE ASSIGNED BY EACH PROGRAMMER 
00250A 2528 321 DC AL2 (N00003) 000015 436+B53 EQU 21 5 4 * 
00250c 0003 322 DC XL2*0003' 000016 437+B54 EQU 22 6 2 * 
000003 323 EQN0O0003 EQU 0003 000017 438+B55 ERD 23 7 1 * 
00250E 2542 324 DC AL2 (NOQOO4) 000018 439+B56 EQU 24 8 8 * 
002510 0004 325 DC XL2*0004! 000019 44Q0+B57 EQU 25 9 4 * 
000004 326 EQNOOO0OO04 EQU 0004 OOOO1A 441+B58 EQU 26 10 2 * 
002512 254E 327 DC AL2 (N00005) 00001B 442+B59 EQU 27 11 1 * 
002514 0005 328 DC XL2"0005! 0000 1C 443+B60 EQU 28 12 8 * 
000005 329 EQN0O0005 EQU 0005 00001D GU4+B61 EQU 29 13 4 * 
002516 2560 330 DC AL2 (N00006) QOO0TE 445+B62 EQU 30 14 2 * 
002518 0006 331 DC XL2'0006! OQOO001F 446+B63 EQU 31 15 1 * 
000006 332 EQNO0006 EQU 0006 OOOO1E 44 7+CH EQU 30 14 2 CHARACTER SUPPLIED 
00251A 2562 333 DC AL2 (N00007) 00001F 4&4 84+CMP EQU 31 15 1 COMPARE OPERATION 
00251C 0007 334 DC XL2*0007! 0025D8 0000 450+OPTN3 DC X*0000! PROGRAM OPTION CONTROL WORD 3 
000007 335 EQNO0007 EQU 0007 451+* 
00251E 0000 336 DC AL2 (DUMMY) 452+* QO MYSTERY INTERRUPT MI 8 CS STATUS IN PROGRESS CS 
337 III III COR OR IORI IO I IOI KOI i ak tke ak 453+* 1 ERROR INTERRUPT ER 9 CS AVAILABLE CSA 
338 RO oz IK Jak io iC tok 30 2 I a i tak kok i koi 3k 2k ae akc ak ak 2k 454+* 2 EXPECTED INTERRUPT XI 10 CS STATUS INTERRUPT ERR CE 
339 *x eK 455+* 3 QINTERRUPT RECEIVED IN 11 ISB BITS ON (1-7) ISBON 
340 ** RULE INFORMATION TABLE * 456+%* 
341 ** ak 457+* G4 EXPECTED EPR/ATTENT XE 12 TEST UNIT RESULTS VOID NG 
342 Ook ok io aoc ICC CK aK ok kok ak ko a ki ak ie kak fie 2 ac ic aca ka akc akc ai akc ak 458+* 5 HARD ERROR FOUND HE 13. OIO CC ER OCC 
343 AO II IO IG OR IO Io OO loa ia I deka ak ak ak ak afc ke ak teak ak 459+* 6 WRONG INTR LEVEL SLE 14 NO INTERRUPT NOIN 
344 NO0001 SQUES QT= 900015), ,YES=N00003,CT=(C00014) 460+* 7 NO INTR EXPECTED NI 15 INTERRUPT CC ERROR INCC 
002520 0100 345+N00001 D A (@QUES } 461+* BIT HEX 
002522 2528 346+ DC AL2(N00003 000020 4Y624+MI 32 0 8 MYSTERY INTERRUPT HAPPENED 
347 nNO0002 S$STOP FT= (F00021 000021 463+ER FOU 33 1 4 ERROR RECEIVED ON INTERRUPT 
002524 0102 348+N00002 DC A (@STOP) 000022 4Y644XT eet 34 2 2 EXPECTED INTERRUPT CONTROL BIT 
002526 257A 349+ C A (F00021) 000023 4Y65+IN EQU 35 3 1 INTERRUPT RECEIVED CONTROL BIT 
350 N00003 SINPT DATA=HEX,FIELD=PARM, LNG=08, LOW=0000000000000000, HIGH=FF FX 000024 466+XE EQU 36 4 8 EXPECTED ERROR RESPONSE 
002528 0300 351+N00003 DC A (@INPT 000025 467+HE EQU 37 5 4 HARD ERROR, 8 RETRIES 
00252A 0001 352+ DC AL2 (HEX 000026 468+$LE EQU 38 6 2 INTERRUPT ON WRONG LEV ee ERROR 
00252C 254E 353+ DC AL2 (N00005) 000027 4Y694NT EQU 39 7 1 NO INTERRUPT EXPECTED 
00252E 0000 354+ DC AL2 (PARK) 000028 4Y70+CS EQU 40 8 8 CYCLE STATUS IN PROGRESS 
002530 0008 355+ DC AL2 poh 000029 G714+CSA EQU 44 9 4 CYCLE STEAL AVAILABLE 
002532 0000000000000000 356+ DC X'00000000000000008 QO002A 4&72+CE EQU 42 10 2 CYCLE STEAL STATUS INERRRUPT ERROR 
357+ ALIGN WORD 00002B 473+ISBON EQU 43 11 1 ISB BITS ON (1-7) 
00253A FFFFFFFFFFFFFFFF 358+ C X*FFFFFFPFFFFFFFFF'* 00002C 474U+NG EQU 44 12 8 TEST UNIT RESULTS NO GOOD 
359+ ALIGN WORD 00002D 475+IOCC EQU 45 13 4 OIO CC ERROR 
360 NOOOO4Y S$GOTO TYPE=INTRNL, EP=B, FT=(F00545) ,GTO= (N00003) 00002E 4Y76+NOIN EQU 46 14 2 NO INTERRUPT 
002542 0200 361+N00004 DC A eae: 00002F G77+INCC EQU 47 15 1 INTERRUPT CC ERROR 
002544 258A 362+ DC A (F00545) 478+* 
002546 F3C3FOFO 363+ DC CL4*3C00' 4Y79+* COMMON BUFFER FOR PRINTING DATA 
OO254A C240 364+ DC CL2*Bé 480+* 
00254cC 0000 365+ DC AL2 (INTRN At 0025DA 0000 4Y82t+$TUID DC A (*-* TEST UNIT IDENTIFICATION 
366 NO0005 STUXX T7AAA,2,0000, EQ, QT=(Q00547) , YES=N00007, CT= (C00548) 0025DC 0000 483+SIOIN DC A (*- * I7O AND INTR CONDITION CODES 
00254E 0500 367+N00005 DC A (atu kxf 0025DE 0000 484+$ISB DC A (*-% R7, INTR STATUS BYTE & DEV ADRS 
002550 2562 368+ DC Were et 07) 0025EO0 0000 485+LSTIO DC A (*-* ADRS OF LAST I/O + 4 BYTES 
002552 2B6C 369+ DC A (T7AAA) 0025E2 0000 486+DEV1 DC A (*-* DEVICE DEPENDENT DATA 
002554 0000 370+ DC AL2 (EQ) 0025E4 0000 487+DEV2 DC A (*-* * 
002556 0002 371+ DC AL2 ray 0025E6 0000 488+DEV3 DC A (*- * * 
002558 0000 372+ DC X'OOO0! 0025E8 0000 489+DEV4 DC A ( *-* CS STATUS ERROR ISB & INTR CC 
373+ ALIGN WORD 0025E2 490+SCTID EQU DEV1 READ ID BUFFER FOR IBIS & TERN 
00255A 0000 374+ C AL2 (0) OO25EA 4914+#DCBUF EQU * DCB BUFFER FOR LAST DCB USED 
00255c¢c C1C1 375+ Cc C*AA! 0025EA 0000 492+DCB1 DC A (*-* LAST DCB TABLE, CONTROL WORD 
376+ ALIGN WORD 0025EC 0000 493+DCB2 DC A (*-* LAST DCB TABLE, DEV DEP WORD 
00255E 196E 377+ DC eee RA) O0O025EE 0000 494+#DCB3 DC A (*-* LAST DCB TABLE, DEV DEP WORD 
378 NOQ0006 SNVLD F = 00550) ,CT= (C00552) ,ST= (S00553) 0025FO0 0000 495+DCB4 DC A (*-* LAST DCB TABLE, DEV DEP WORD 
002560 0600 379+N00006 DC A (a vty 0025F2 0000 496+DCB5 DC A (*- * LAST DCB TABLE, DEV DEP WORD 
380 NO0007 $GOTO TYPE=INTRNL, EP=A, FT=(F00560) , GTO= (NO0001) 0025F4 0000 497+DCB6 DC A (*-* LAST DCB TABLE, CHAIN ADRS 
002562 0200 381+N00007 DC A eeoeeh 0025F6 0000 498+DCB7 DC A (*-* LAST DCB TABLE, BYTE COUNT 
002564 25B4 382+ DC A (F00560) 0025F8 0000 499+DCB8 DC A (*-* LAST DCB TABLE, BUFFER ADDRESS 
002566 F3C3FOFO 383+ DC CL4'3c00! 500+* 
00256A C140 384+ DC CL2‘*A? OO25FA 501+CSBUF EQU * CYCLE STEAL DATA BUFFER 
00256C 0000 385+ DC AL2 (INTRNL) Q0O25FA 0000 502+CSTL1 DC A (*-* CS STATUS WD 0, RESIDUAL ADDRESS 
00256E 0000 386 ae AL2 (DUMMY) 0025FC 0000 503+CSTL2 DC A (*-* CS STATUS WD 1, RESIDUAL COUNT 
002570 387 ENTPT * 0OO025FE 0000 504+CSTL3 DC A (*-* CS STATUS WD 2, RETRY CNT WD 1 
388 pee rr MKS EEEUWSREDEST ERE Oa oe 002600 0000 505+CSTL4Y DC A (*- * CS STATUS WD 3, RETRY CNT WD 2 
389 =e OO IO III II III IO I kia i kak ak 002602 0000 506+CSTLS DC A (*-* CS STATUS WD 4, ERROR STATUS WD 1 
390 ** OK 002604 0000 507+CSTL6 DC A (*-* CS STATUS WD 5, ERROR STATUS WD 2 
391 ** ENTRY POINT TABLE eK 002606 0000 508+CSTL7 DC A (*-* CS STATUS WD 6, LAST DCB ADDRESS 
392 ** KX 002608 0000 509+CSTL8 DC A (*- * CS STATUS WD 7, PREVIOUS HD/CYL 
393 =O OC IG ICG I ICI IGRI OOK ak I ka rok okok kc ioioiok acaok 00260A 0000 510+CSTLIY DC A (*-* CS STATUS WD 8, CURRENT HD/CYL 
394 Fk RI OR RII II II IO RIO IO III IO a I oR ik a ic i kk ak ak akc 00260C 0000 511+CST10 DC A (*-* CS STATUS WD 9, FLAG/SECTOR 
395 ENTPT EP=A,STEP=00001 00260E 0000 512+CST11 DC A (*-* CS STATUS WD 16, poe crane 
002570 C140 396+ DC 2*A?t 002610 0000 513+CST12 DC A (*-* CS STATUS WD 11, DIAG BYTES 
002572 2520 397+ DC aeeo cree 002612 0000 514+CST13 DC A (*-* CS STATUS WD 12, AND 3 + RAP "Byhe 
398 ENTPT EP=B, STEP=00003 515+%* 
002574 C240 399+ DC CL2'B® 002674 0000 516+$SUBN DC A (*-* LAST SUBROUTINE ADDRESS USED 
002576 2528 4OO+ DC Sn puke 002616 00000000 517+$DATA DC 2A (*-* OPTIONAL DATA 
002578 0000 4O1 DC AL2 (DUM 00261A 0021 518+$INTL DC X"0021! INTERRUPT LEVEL REQUESTED 
402 eH EES OE ERASER OIE EOE EEO SIE IERIE IEE EH SSI Ia SEES 1k 00261C 0000 519+TURIN DC A (*~ *) TEST UNIT RETURN ADRS TO MDI 
403 PESTER AGERE TS EAE ETES SESE A PERT EA SEAS EINER ERP ASHES EET EA CERES ET AEE EEE CA 00261E 00 520+$DVID DC X"QO! DEVICE ID 
“OW *x* % 002620 19D0 521+SVCAL DC A (DEVADD) ADRS OF DEVICE ADDRESS 
OE pees MESSAGE TABLE ee 002622 0000 Boas DC A (*-*) IBIS CYLINDER ADDRESS 
O07 ROR OR IIRC I OR I CK 2 OR I IRI ak aK a ak ak a a ak ok akc ak 524+ * THIS TEST UNIT WILL RETURN TO MDI WITHOUT DOING ANY PROGRAM 
408 3 ORI ORO IC CO IG Rak Fok kk RK I I 3k 4a fe oke aca ak 525+ * FUNCTION. THE RESULTS THAT WERE SET UP IN THE RESULTS AREA ARE 
OO257A 409 FO00021 EQU * 526+ * STILL VALID BUT A DIFFERENT TEST IS TO BE PERFORMED. 
00257A 0001 410 DC AL2 (0001) 527+ * 
00257C 0Q00C 411 DC A (0012 002624 4020 25DA 7A02 528+T7A02 MVWI X'7A02', $TUID SET UP TEST UNIT ID 
O0257E CS5SD5C44O0DECE40E3C 412 DC CLOO12'*END OF TEST ! 00262A 5700 529+ BXS AB it RETURN TO MDI SUPVR 
00258A 413 FO0545 EQU * 531 COPY OM Qu 
00258A 0001 “14 DC AL2 (0001) 532 3 IIR IGRI IO CIR IO IO IOI ICI ICO OO ak KG oi a toe ak 
00258C 0012 415 DC A (0018) 533 * * 
00258E DS5D6E340E5C1D3C9C 416 DC CLOO18*NOT VALID RESPONSE! 534 * EQUATED NAMES FOR SUPPORTED SVC'S * 
0025A0 417 FO0550 EQU * 535 * * 
002540 0001 418 DC AL2 (0001) 536 CC OIG IG OR COR oR ioc OK i ai kak tok i icie icici ak kak ak 
Q0025A2 0010 419 DC A(O 16) 000000 537 OUT EQU 0 OUT SVC 
O0O25A4 D5D640D3C5C740D5D 420 DC CLO016"NO LEG NOT VALID* 000001 538 OUTIN EQU 1 : OUTIN SVC 
0OO025BY4 421 FO00560 EQU * 000002 539 IDLE EQU 2 IDLE SVC 
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LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 
000003 540 IDLE5 EQU 3 IDLE SVC - INDEPENDENT OF CPU TYPE 00264C 082D 659 WSDCB DC Xx*O82D! WRITE SECTOR ID CNTL WORD-SE ON 
000004 541 CHNGE EQU m CHANGE LEVEL SVC 00264E 0000 660 DC X¥'0000' FG/SEC 
000005 542 PGMCK EQU 5 ALLOW RETURN ON PROGRAM CHECK SVC 002650 0000 661 DC A (*-* HD/CYL 
000006 543 EXIT EQU 6 EXIT SVC 002652 0000 662 DC A (*-* NOT USED 
000007 544 TERM EOU 7 TERMINATE SVC 002654 26FE 663 pc A(RSBA) RSB ADDRES 
000008 545 RESET EQU 8 RESET DEVICE SVC 002656 0000 664 DC A (*-* CHAIN ADDRESS 
000009 546 RID EQU 9 READ ID SVC 002658 0004 665 DC x*ooodr BYTE COUNT 
OOOOOA 547 START EQU 10 START CYCLE STEAL SVC 00265A 26FA 666 DC A (WRSID) ADDR OF SECTOR ID DATA 
00000B 548 STCSS EQU 11 START CYCLE STEAL STATUS SVC 667 * 
00000C 549 PREP EQU 12 PREPARE DEVICE SVC 668 ***** READ SECTOR ID DCB ******* 
00000D 550 READO EQU 13 READ WITH FUNCTION BIT 3 OFF SVC 669 * 
OOO00E 551 READ1 EQU 14 READ WITH FUNCTION BIT 3 ON SVC 00265C 2014 670 RSDCB DC X*20148 READ SECTOR ID — AUTO SEEK-SE ON 
OOO000F 552 RSTAT EOQU 15 READ STATUS SVC 00265E 0000 671 DC Xx*0000! FG/SEC 
000010 553 WRITO EQU 16 WRITE WITH FUNCTION BIT 3 OFF SVC 002660 0000 672 DC X¥*O0000! HD/CYL 
000011 554 WRIT1 EQU 17 WRITE WITH FUNCTION BIT 3 ON SVC 002662 0000 673 DC X¥*0000! NOT USED 
000012 555 CTRL EQU 18 CONTROL SVC 002664 26FE 674 DC A (RSBA) RSB ADDRESS 
000013 556 RICB EQU 19 RELEASE INTERUPT CONTROL BLOCK Svc 002666 0000 675 DC X¥*0000 CHAIN ADDRESS 
000014 557 CICB EQU 20 CONNECT INTERUPT CONTROL BLOCK SVC 002668 0004 676 DC X*OOO4! BYTE COUNT FOR READ SECTOR ID 
000015 558 HIO EQU 21 HALT ALL I/0 00266A 25E2 677 DC A (SCTID) SECTOR ID DATA ADDRESS 
000016 559 REOSD EQU 22 REQUEST USE OF DCP DISK SVC 678 * 
000017 560 RELSD Eou 23 RELEASE USE OF DCP DISK SVC 679 ***** SEEK DCB ****#%« 
000018 561 HALT EQOU 24 HALT SVC 680 * 
000019 562 ETOH EQU 25 EBCDIC TO HEX SVC (STRING 00266C 0000 681 SKDCB DC x*Q000°8 SEEK DCB 
OOOO1A 563 HTOE EQU 26 HEX TO EBCDIC SVC (STRING 00266E 0000 682 DC x*0000! FG/SEC 
00001B 564 ATOH EOQU 27 ASCII TO HEX SVC TRING 002670 0000 683 DC F'o! HD/CYL 
00001C 565 HTOA EQU 28 HEX TO ASCII SVC (STRING 002672 0000 684 DC F'or 
00001D 566 ETOA EQU 29 EBCDIC TO ASCII SVC (STRING 002674 26FE 685 DC A(RSBA) RSB ADDRESS 
OOO001E 567 ATOE EQU 30 ASCII TO EBCDIC Svc (STRING 002676 0000 686 DC A (*¥-*) CHAIN ADDRESS 
OOOO1F 568 READI EQU 31 READ DATA SETS FOR MDI/UTIL 002678 0000 687 DC F'or NOT USED 
000020 569 WRITL EQU 32 WRITE DATA SETS FOR UTIL 00267A 0000 688 DC Ftor NOT USED 
571 PSPS ES SPSS ETS SSS SS SESS SS SS SSL SSS SS SPL SSS SSSS SLL SS SS SSS SCSSS SSS SSS SSL SL St OS Ss 689 * 
572 * * 690 ***** CYCLE STEAL STATUS DCB ******** 
573 * EQUATES USED BY TU'S AS CONSTANTS * 691 * 
574 * * 00267C 2000 692 CSDCB DC x*2000°8 CONTROL WORD 
575 PSPSPS FS LS TSS SITS SSE SS SSS SSS SESS SSS SSS SSS SS SSS SSS SS SSCS SOS SSOSOSSSCLCC Ee’ SS OO2Z67E 0000 693 DC Fo? NOT USED 
OOOO4E 576 PLUS EQU C+! PLUS CHAR 002680 0000 694 DC F'o? NOT USED 
000060 577 MINUS EQU ct-t MINUS CHAR 002682 0000 695 DC F'or NOT USED 
000000 579 ZERO EQU 0 002684 0000 696 pc F'or NOT USED 
000001 580 ONE EOU 1 002686 0000 697 DC F'o? NOT USED 
000002 581 TWO EQU 2 002688 OO1A 698 DC X"OOTA! 13 WORDS OF STATUS 
000003 582 THREE EQU 3 00268A 25FA 699 DC A (CSBUF) ADDRESS OF CYCLE STEAL STATUS DATA 
000004 583 FOUR rm 700 * 
000005 584 FIVE EQU 5 701 ***** WRITE DCB KKK 
000006 585 SIX EQU 6 702 * 
000007 586 SEVEN EQU 7 00268C 0021 703 WRDCB DC x'0021° WRITE/VERIFY CNTL WORD- AUTO SEEK 
000008 587 EIGHT EQU 8 00268E 0000 704 DC F'o? FG/SEC 
000009 588 NINE EQU 9 002690 0000 705 DC X'0000!8 HD/CYL 
OOOOO0A 589 TEN EQU 10 002692 0000 706 DC X¥*0000! 
00000B 590 ELEVN EQU 11 11 002694 26FE 707 DC A (RSBA) RSB ADDRESS 
00000C 591 TWELV EQO 12 12 002696 0000 708 DC A (*-* CHAIN ADDRESS 
00000D 592 THRTN EQU 13 13 002698 0100 709 DC Xx*01008 BYTE COUNT 
OO000F 593 FIVTN EQU 15 15 00269A 0000 710 Dc A (*-*) WRITE DATA ADDRESS 
000010 594 SIXTN EQU 16 16 711 * 
000020 595 THRY2 EQU 32 32 712 ***** VERIFY DCB 2h CK ok 
000040 596 SIXTY EQU 64 64 713 * 
000080 597 ONE28 EQU 128 128 00269C 0011 714 VRDCB DC X'0O0118 CONTROL WORD 
000100 598 TWO56 EQU 256 256 00269E 0000 715 DC For FG/SEC 
000400 599 ONEK EQU 1024 1024 0026A0 0000 716 DC x*0000! HD/CYL 
000800 600 TWOK EQU 2048 2048 0026A2 0000 717 DC x*'00008 
000C00 601 THREK EQU 3072 3072 0026A4 26FE 718 pc A (RSBA) RSB ADDRESS 
001000 602 FOURK EQU 4096 4096 0026A6 0000 719 DC A (*-*) CHAIN ADDRESS 
FFFFFF 604 M1 EQU -1 -1 0026A8 0000 720 DC Fro: BYTE COUNT 
FFFFFE 605 M2 EOQU -2 -2 O0026AA 0000 721 DC A (*-*) VERIFY DATA ADDRESS 
FFFFFD 606 M3 EQU -3 -3 722 * 
FFFFFC 607 M4 EQU -4 -4 723 ***** READ DCB 2K 
609 KK HK KK KK KK KK he eK ee aK eK KK eh 2 2 Ke KE 2K 2K i 2 a I i i 2 2 2 2 a i a 2 2 KK KK i 2 kK 724 * 
610 * * 0026AC 2010 725 RDDCB DC X*2010! READ DCB CONTROL WORD - AUTO SEEK 
611 * THE FOLLOWING ARE EQUATES FOR BIT DISPLACEMENTS FROM THE * 0026AE 0000 726 DC Fo! FG/SEC 
612 * BEGINNING OF THE BYTE TO EACH BIT IN THE WORD OF SWITCHES. * 0026B0 0000 727 DC x*0000! HD/CYL 
613 * * 0026B2 0000 728 DC X¥'0000!8 
614 PPS SPS SL SSL S SSL SSS SSSSLSL SSS SLSSSESSESSS SSS SSSSL SS SSS PS SSS ES SS SE SL SSSSSL SS ss 3 O0026B4 26FE 729 pc A RSBA) RSB ADDRESS 
000000 615 BSO EQU 0026B6 0000 730 DC A {eas CHAIN ADDRESS 
000001 616 BS1 EQU 0026B8 0100 731 DC x¥*0100! BYTE COUNT 
000002 617 BS2 EQU 2 0026BA 0000 732 Dc A (*-*) READ DATA ADDRESS 
000003 618 BS3 EQU 3 733 * 
000004 619 BS4 EQU 4 734 **** WRITE SECTOR ID SKEWED KK 
000005 620 BSS EQU 5 735 * 
000006 621 BS6 zou 6 0026BC 0O82F 736 WKDCB DC X'O82Ft CONTROL WORD - SE ON 
000007 622 BS7 EQU 7 0026BE 0000 737 DC X¥*0000! FG/SEC 
000008 623 BS8 EQU 8 0026C0 0000 738 pc A (*-* HD/CYL 
000009 624 BSY EQU 9 0026C2 0000 739 Dc A (*-* NOT USED 
OOOOOA 625 BS10 EQU 10 0026C4 26FE 740 Dc A (RSBA) RSB ADDRESS 
00000B 626 BS11 EQU 11 0026C6 0000 741 DC *—* CHAIN ADDRESS 
00000C 627 BS12 Bou 12 0026C8 0004 742 DC x*o0Ou8 BYTE COUNT 
00000D 628 BS13 EOU 13 OO26CA 26FA 743 DC A (WRSID) ADDR OF SECTOR ID DATA 
OOO00E 629 BS14 EQU 14 744 * 
O0000F 630 BS15 zou 15 745 **** READ SECTOR ID SKEWED KK 
632 COPY T7A69DCB ISNOVT7 746 * 
633 ** 0026CC 2015 747 RKDCB DC x*20158 CONTROL WORD- AUTO SEEK —- SE ON 
634 * 0026CE 0000 748 DC x*00008 FG/SEC 
635 HHA HK HK A KK HK IK KR EK KK KK KEE KKK / 71/7 BEEK KK KK KK 0026D0 0000 749 DC x¥'*ooo0! HD/CYL 
636 * 0026D2 0000 750 DC x' 00008 NOT USED 
637 * DCB TABLES AND DC'S 0026D4 26FR 751 DC A (RSBA) RSB ADDRESS 
638 * 0026D6 0000 . 752 DC A (*-* CHAIN ADDRESS 
639 PSPSPS FSS SSS SSE SSL SPP SSPE SES LS SS SS PSS SE SSCS SSESSS SSS SSS SSS SES SSL SE SS SSS 2 O23 0026D8 0004 753 DC X*Qooou? BYTE COUNT FOR READ SECTOR ID 
640 * 0O026DA 25E2 754 DC A (SCTID) SECTOR ID DATA ADDRESS 
641 ***** DIAGNOSTIC DCB ROK ak Kk 755 * 
642 * 756 **** READ MULTIPLE SECTOR IDS 40K 40K 
00262C 2016 643 DGDCB DC X'2016? DIAGNOSTIC DCB 757 * 
00262E 0000 644 DC X'00008 FG/SEC 0026DC 2014 758 RMDCB DC Xx*2014¢# CONTROL WORD- AUTO SEEK - SE ON 
002630 0000 645 DC A (*-* HD/CYL 0O026DE 0000 759 pc Feor FLAG/SECTOR 
002632 0000 646 DC x*0000!8 NOT USED 0026E0 0000 760 pc x*0000! HEAD/CYLINDER 
002634 26FE 647 DC A (RSBA) RSB ADDR. 0026E2 0000 761 DC X¥*0000! SCAN COUNT 
002636 0000 648 DC A (*-* CHAINING ADDRESS OO26E4 26FE 762 DC A (RSBA) RSE ADDRESS 
002638 0100 649 pc X*01008 BYTE CCUNT 0026E6 0000 763 Dc A (*-* CHAIN ADDRESS 
00263A 0000 650 pc A (*-*) DATA ADDRESS 0026E8 0084 764 DC x*oosh: BYTE COUNT 
651 * OO26EA 3F14 765 DC A (ID00) DATA AREA ADDRESS 
652 ***** RECALIBRATE DCB *****% Kx 766 * 
653 * 7167 * CONSTANTS AND DEFINED STORAGE LOCATIONS 
00263C 0001 654 CLDCB DC X'0001! RECALIBRATE DCB 0026EC 0000 768 ZEROO DC x'o00008 CONSTANT ZERO 
00263E 00000000000000000 655 DC TA (*-*) 0OO0O26EE 0001 769 ONE1 DC X¥*00018 CONSTANT ONE 
656 * 0026F0 0000 770 RAY DC A (*-*) WRITE PARAMETER POINTER 
657 ***** WRITE SECTOR ID ** 0026F2 EB6D 771 WDATA DC X*EB6D? WRITE DATA 
658 * OO26F4 6BDB 772 DC X"*6BDB! * 
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OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 
0000 773 LGSEC DC x*o0008 LOGICAL SECTOR # 0027C8 4020 2952 265C 888 $RDID MVA RSDCB,1ODCB SET UP BLOCK FOR SVC CALL 
0000 774 PHYSC DC x*00008 CONVERTED PHYSICAL SEC # OO27CE OBFF 889 MVBI X*FF,RP3 SET BUFFER TO F'S 
0000 775 WRSID DC x*00008 FLAG,SECTOR (WRT SECTOR ID DATA) 0027D0 4524 25R2 890 MVA SCTID,R5 SETUP READ SECTOR ID BUFFER ADRS 
0000 7176 DC x*o00008 HFAD,CYLINDER 0027D4 4724 0004 891 MVWI 4,R7 SETUP BUFFER LENGTH 
00000000000000000 777 RSBA DC 6A (*-*) RESIDUAL STATUS BLOCK 0027D8 2BAC 892 FFN R3, (R5) INIT READ SECTOR ID BUFFER 
7718 * 0027DA 5032 893 J x16 
779 - FF FS SSPE S SSS SLES SLES SSSP SS SSS SSS SSS SSS SSS SSE LS SS SS SSCSCSCSCSLTS SS SSS LS SSS SS 894 * 
780 * 0027DC 4020 2952 26DC 895 $RDIM MVA RMDCB,IODCB SET UP CONTROL BLOCK FOR SVC CALL 
781 * CALLING SEQUENCE 0027E2 4724 0084 896 MVWI 132,R7 SET BUFFER LENGTH 
782 * O0O27E6 4524 3F14 897 MVA 1D06 RS SET BUFFER ADDRESS 
783 * BAL CONVT,R7 OO27EA OBFF 898 MVBI X'*FF!,R3 SET CLEAR CHARACTERS 
784 * 0O27EC 2BAC 899 FFN R3 (r5) CLEAR THE BUFFER 
185 * RETURN O0O27EE 5028 900 r J X16 
787 * B (TT304+2) 0027FO OBFF 902 $RD MVBI X'FF*,R3 SETRD BUFFER TO ALL F'!S 
788 * 00O27F2 6D08 26BA 903 MVW RDDCB+14,R5 SET UP READ BUFFER ADRS 
789 OKO IORI OI OO IO I Ea ro OR I kof te afk 0027F6 4724 0100 904 MVWI X'0100', 87 SET UP BUFFER LENGTH 
790 * OO27FA 2BAC 905 PFN R3 85) CLEAR READ BUFFER 
6FOD 27AC 791 CONVT MVW R7,CNVT8+2 SETUP RETURN ADDR 00O27FC 4020 2952 26AC 906 $RDS MVA RDHCB, LODCB SET UP BLOCK FOR SVC CALL 
690D 27B6 792 MVW R1,SAVE1 SAVE CONTAINS OF R1 002802 501E 907 J XIO 
C120 26F7 7193 MVB LGSEC+1,R1 GET THE SECTOR NUMBER 908 * 
310A 794 SRL 1,R1 ALIGN IT 002804 4020 2952 269C 909 $RDVY MVA VRDCB, IODCB SET UP CONTROL BLOCK FOR SVC CALL 
C128 26F9 795 MVB Ri, PHYSC#1 PLACE IT INTO PHYSICAL # 00280A 501A 910 J XIO 
402B 3466 4000 796 TWI X'*4000', HDCYL CHECK FIXED HEADS 911 * 
123A 797 JON CNVT6 HEAD NUMBER SAME AS PHYSICAL 00280C 4020 2952 268C 912 $WRT MVA WRNCB, IODCB SET UP CONTROL BLOCK FOR SVC CALL 
6908 3466 7198 MVW HDCYL,R1 GET THE HEAD 002812 5016 913 J XIO 
3121 799 SLi 4 R1 SHIFT OUT EXCESS 914 * 
3172 800 SRL 14,R1 ALIGN THE HEAD 002814 4020 2952 26cC 915 S$RKEW MVA RKDCB, IODCB SET UP CONTROL BLOCK FOR SVC CALL 
1035 801 IZ CNvT6 LOGICAL =S PHYSICAL 00281A 5012 916 J XIO 
7922 0001 802 SWI 1,R1 CHECK HEADS 1,5,9 917 * 
1023 803 JZ CNVTY GO SET THE SECTOR 00281C 4020 2952 26BC 918 $WKEW MVA WKDCB, IODCB SET UP CONTROL BLOCK FOR SVC CALL 
7922 0001 804 SWI 1,R1 CHECK HEADS 2,6,10 002822 500E 919 J XIO 
1010 805 3Z chvr2 GO SET SECTOR 920 * 
802B 26F9 27B4 806 CB PHYSC+#1,CB40 CHECK SECTOR 32 002824 4020 2952 264c 921 $WSEC MVA WSDCB, IODCB SET UP CONTROL BLOCK FOR SVC CALL 
1032 807 JE CNVT9 YES THE SAME LOCATION 00282A 500A 922 J XIO 
802B 26F9 27AE 808 CB PHYSC+1,CBO7 SFCTOR LESS THAN 7 923 * 
1FO4 809 JLGE CNVT1 LESS THAN OR EQUAL 00282C 4020 2952 262C 924 S$DIAG MVA DGDCB, 1IODCB SET UP CONTROL BLOCK FOR SVC CALL 
4WO2E 26F8 0008 810 SWI 8,PHYSC OFFSET OF 8 002832 OBFF 925 MVBI X'FFT,R3 SETRD BUFFER TO ALL F'S 
5023 811 J chvre GO SAVE 002834 6D08 263A 926 MVW DGDCB+14,R5 SET UP READ BUFFER ADRS 
4029 26F8 0018 812 CNVT1 AWI 24,PHYSC OFFSET OF 24 002838 4724 0100 927 MVWI X¥'0100',&7 SET UP BUFFER LENGTH 
501F 813 J NVT6 00283C 2RAC 928 PFN R3, (R5) CLEAR READ BUFFER 
802B 26F9 27B4 814 CNVT2 CB PHYSC+1,CB40 CHECK SECTOR 32 00283E 5000 929 J x16 
1022 815 JE CNVT9 YES THE SAME LOCATION 930 * 
802B 26F9 27B0 816 CB PHYSC+#+1,CB15 SECTOR LESS THAN 15 932 COPY T/AXEQ OOMAR78 
1FO4 817 JLGE CNVT3 933 PRINT OFF 
4“O2E 26F8 0010 818 SWI 16,PHYSC OFFSET OF 16 1497 T7AXEQ 
5013 819 J CNYT6 VD BE HK KH HH HH KK HK He eH 2K aK CK ok KK kK KK KKK KKK KKKIO TUL 6K * 
4029 26F8 0010 820 CNVT3 AWI 16,PHYSC OFFSET OF 16 1499+ 
S00F 821 J cu vTe 1500+* SUB-ROUTINE 
802B 26F9 27B4 822 CNVT4 CB PHYSC+1,CB40 CHECK SECTOR 32 1501+* 
1012 823 JE CNVT9S YES THE SAME LOCATION 1502+ EXECUTE INPUT AND OUTPUT COMMANDS 
802B 26F9 27B2 824 CB PHYSC+1,CB23 SECTOR LESS THAN 23 1503+* 
1F04 825 JLGE CNVT5 1504+* PURPOSE 
4O2E 26F8 0018 826 SWI 24,PHYSC OFFSET OF 24 1505+* 
5003 827 J CNUTE SAVE IT 1506+* TO EXECUTE ALL I/O COMMANDS FROM A COMMON PLACE. 
4029 26F8 0008 828 CNVTS AWI 8, PHYSC OFFSET OF 8 1507+* THIS SUBROUTINE WILL DO THE FOLLOWING FUNCTIONS: 
402B 26F6 0800 829 CNVT6 TWI X'0800', LGSEC CHECK PISPLACED FLAG 1508+* 
1003 830 JOFF CNVTS NO EXIT 1509+ 1. SAVE THE ADDRESS THAT POINTS TO THE INSTRUCTION THAT STARTED 
4029 26F8 0001 831 AWI 1,PHYSC ADD ONE FOR DISPLACED 1510+* THE I/O COMMAND. 
6908 27B6 832 CNVT9S MVW SAVE1,R1 RESTORE R1 1511+* 2. SAVES THE DCB BLOCK USED UNLESS IT IS A START CYCLE STATUS 
6802 0000 833 CNVT8 B = RETURN 1512+* ISSUED BY THIS SUBROUTINE. 
834 * 1513+* 3. CLEAR OUT THE CYCLE STEAL STATUS STORAGE UNLESS THE 
0700 835 CBO7 DC Xx'0700! SECTOR 7 MASK 1514+* START CYCLE STATUS WAS ISSUED BY THIS SUBROUTINE. 
OF0O 836 CB15 DC X'OFOO! SECTOP 15 MASK 1515+ 4. RESETS THE INTERRUPT INDICATOR AND CHECKS FOR ANY INTERRUPT 
1700 837 CB23 Dc X¥'1700°8 SECTOR 23 MASK 1516+* SINCE THE LAST EXPECTED INTERRUPT. IF AN INTERRUPT IS FOUND, 
2000 838 CB4O DC x¥'*20008 SECTOR 32 MASK 1517+* MYSTERY INTERRUPT (MT) CONTROL BIT IS SET. 
0000 839 SAVE1 DC x*00008 SAVE CONTAINS OF R1 1518+* 5. MOVES THE ADDRESS OF THE I/O CONTROL BLOCK IN R7, SET THE 
840 * 1519+* EXPECTED INTERRUPT CONTROL BIT AND ISSUE THE "SVE STARTT. 
B4u2 * 1520+ 6. WHEN THE SUPVR RETURNS AFTER ISSUING THE I/O COMMAND, TIMING 
843 * EXECUTE INPUT & OUTPUT COMMANDS 1521+* STARTS TO DETERMINE A LOST INTERRUPT. 
B84u4 * TO EXECUTE ALL I/O COMMANDS FROM A COMMON PLACE. 1522+* 7. EXCEPT THE INTERRUPT AND GATHER INFORMATION TO DETERMINE IF IT 
845 * EACH OF THESE ENTRIES SET R7 WITH THE ADRS OF ITS PARAMETER 1523+* WAS AN ERROR OR OKAY AND FXIT OFF THE INTERRUPT LEVEL. 
846 * LIST AND ANY SPECIAL SWITCHES BEFORE BRANCHING TO THE 1524+ 8. CHECK IF THERE WAS A WRONG INTERRUPT LEVEL. 
847 * SUPVR CALL. 1525+* 9. CHECK IF AN ERROR WAS EXPECTED AND IF THERE WAS RETURN. 
848 * ” 1526+* 10. CHECK IF THERE WAS AN ERROR CONDITION, IF NOT RETURN. 
849 * THIS SUBROUTINE WILL CHECK FOP THE FOLLOWING: 1527+* 11. CHECK TO SEE IF THE EXERCISER IS TO BE TERMINATED. 
850 * Z 1528+* 12. CHECK IF A CYCLE STEAL OPERATION WAS IN PROGRESS THAT WAS 
851 * 1. LOST INTERRUPTS BY TIMING OUT A COUNTING LOOP 1529+* ISSUED BY THIS SUBROUTINE. 
852 * 2. ERROR INTERRUPTS RECEIVED FROM SUPVR 1530+* 13. CHECK THE ISB BITS THAT ARE ON. IF BIT O IS ON ISSUE A 
853 * 1531+* CYCLE STEAL STATUS COMMAND. CHECK FOR ANY OTHER BIT BEING ON, 
pee : THIS ROUTINE HAS THE FOLLOWING ENTRIES: ee COUNT IT AND SET UP THE PROPER ERROR MESSAGE TO BE PRINTED. 
826 i 1 BAL SRKEW,R6 READ SECTOR ID SKEWED eats CALLING SEQUENCE 
828 : 2 BAL SWKEW, R6 WRITE SECTOR ID SKEWED 1336+% THIS ROUTINE HAS THE FOLLOWING ENTRIES: 
% + 
860 * 3 BAL SWSEC,R6 WRITE SECTOR ID 1538+* --> BAL XIO OR XEQ ANY CYCLE STEAL COMMAND, MOD=0 
861 * i 1539+* --> BAL XIO1 MOD PARM PRELOADED IN 'ToMOp' 
862 * 4 BAL SDIAG,R6 DIAGNOSTIC 1540+* --> BAL XIOCS,R6 OR XEQ START CYCLE STEAL STATUS, MOD=F 
863 * : 1541+* --> BAL XIOCS-4, R6 AUTO CS STATUS (FOLLOWING oThzR XIO 
ae : 5 BAL XIOCS, R6 CYCLE STEAL STATUS ease z AND DOES NOT POST INTERRUPT STATUS) 
866 * 6 BAL $SEEK,R6 SEEK 1544+* RETURN CONTROL 
867 * : 1545+* 
868 * 7 BAL SRECL,R6 RECALIBRATE 1546+ BXS R6, 2) RETURN TO USER NO ERROR 
869 * . 1547+* OR Ro * RETURN AND RETRY ON ERROR 
870 * 8 BAL $SRDID,R6 READ SECTOR ID 15484 *% OKO KK FOR Flo OK OR igo ik RK ok kok ok tek koi ak ak ac ok 
871 * : 002840 CB25 2954 1550+ XIO MVWZ TIOMOD,R3 SET MOF OF O FOR CYCLE STEAL OP 
872 : 9 BAL SRD, R6 READ 002844 500E lepit, J XI01 CS I/O'S ARE NOT RETRIED 
874 * 10 BAL SRDVY,R6 RFAD VERIFY 002846 4020 2954 O00D 1553+XIODG MVWI xX!'OOOD*,IOMOD SET MODIFIER FOR DIAGNOSTIC OPS 
875 * : 00284cC SOOA 1554+ J XIO1 GO TO CS OPS 
876 * 11. BAL SWRT,R6 WRITE 1555+* 
877 * OO284EB 4CAA 1556+ TBTR R4Y,CE RESET CS STATUS INTER ERROR INDICAT. 
878 * 12 BAL SRDIM,R6 READ MULTI SECTOR IDS 002850 4cC68 1557+ TBTS R4,CS SET "CYCLE STEAL STATUS! IN PROGRESS 
879 x 002852 4020 2952 267C 1558+XIOCS MVA SDCB, IODCB SET UP CONTROL BLOCK FOR SVC CALL 
880 * 13. BAL SWRTO, RO WRITE DPC COMMANDS 002858 4020 2954 OOOF 1559+ MVWI X'O000F*, TOMOD SET CYCLE STEAL MODIFIER 
881 * 00285E 4C28 1560+ TBT (RA CS) TS CS IN PROGRESS, ERROR CONDITION 
4020 2952 266C 882 $SEEK MVA SKDCB,IODCB SET UP CONTROL BLOCK FOR SVC CALL 002860 1213 1561+ JON T02 * YES, BYPASS SAVING I/O ADRS 
5040 883 J XIO 002862 6E0D 25E0 1562+XIO1 MVW R6,LSTIO SAVE IAR FOR RETRY IF REQUESTED 
884 x 002866 4324 25FA 1563+ MVA DCBUF, R3 SET UP TO ADRS TO MOVE DCB TABLE 
4020 2952 263C 885 $RECL MVA  CLDCB,IODCB SET UP BLOCK FOR SVC CALL Q0286A 6D08 2952 1564+ MVW = = IODCB,RS * AND THE FROM ADRS, ALONG WITH 
503c 886 J XIO 0OO286E OFIA 1565+ MVBI 26,R7 * THE NUMBER OF MOVES 
887 * 002870 2D64 1566+ MVFN (R5) , (R3) MOVE 1 STATUS WORD AND ADJUST 
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002872 OBFF 1567+ MVBI 255 CLEAR CYCLE STATUS BUFFER 1684+* IL 
002874 4524 25FA 1568+ MVA e268 R5 * TO ALL ONES 1685+* SOUBROUTINE IL 
002878 OFIA 1569+ MVBI a6 R7’ * 1686+* IL 
OO287A 2BAC 1570+ FFN at >) * 1687+* OKAY INTERRUPT RUNS ON INTERRUPT LEVEL '$INTL!* IL 
00287C 4020 25DC 0708 1571+ MVWI Fi 6 08',SIOIN OVERLAY OLD CONDITION CODES 1688+* IL 
002882 CB25 25DE PE ae MVWZ S1SB 7R3 ZERO OUT OLD ISB VALUE ee PURPOSE cf 
+ + 
002886 4CA1 1574+ TBTR R4,ER RESET ANY ERROR BEFORE I/0 COMMAND 1691+* TO CHECK THE INTERRUPT AND CONTINUE THE TEST IL 
002888 4CA3 1575+XI0O2 TBTR R4,IN CLEAR INTERRUPT RECEIVED CNTL BIT 1692+* IL 
OO288A 4724 29KE 1576+ MVA OBLK SET UP CONTROL BLOCK FOR SUPVR 1693+* CALLING SEQUENCE IL 
OO288E 4CA6 1577+ TBTR A siz) RESET LEVEL ERROR INDICATOR 1694+* IL 
002890 4cC62 1578+ TBTS XI) SET EXPECTED INTR CONTROL BIT 1695+* SUPERVISOR WILL ENTER HERE IF INTR CC IS AS REQUESTED IL 
002892 600A 1579+ SVC Riba CALL SUPVR FOR I/0 COMMAND 1696+* THE ERROR INTERRUPT HANDLER WILL BRANCH TO THIS ROUTINE EL, 
1580+* 1697+* AFTER THE SPECIAL PART HAS BEEN COMPLETED AND THE IL 
002894 4&CAT 1581+ TBTR R4,NI) TS AN INTR EXPECTED 1698+* COMMON SECTION IS HANDLED HERE. IL 
002896 6ACO 0002 1582+ BN R6, 2) * NO, RETURN TO USER 1699+* IL 
1583+* 1700+* RETURN CONTROL IL 
1584+* THE INTR SHOULD OCCUR WHILE SPINNING IN THE NEXT SECTION 1701+* IL 
1585+* 1702+* SVC EXIT RETURN TO USER VIA SUPVR IL 
O0289A 4524 0000 1586+ MVWI SET UP WORK REG FOR ‘LOST INTR! 1703+* IL 
00289E 4CA3 1587+xXI08 TBTR (f i rN) HAS INTERRUPT BEEN RECEIVED 1TOU + # RIOR III IOI IR IORI IIR ak tok tok tok ke kk eT 
0028A0 1239 1588+ JON Tock * YES, CHECK IF ALL WAS SATISFACTORY O0O028E2 706E 1705+INTOK CPLSR R3 COPY STATUS ANY LEVEL INTO R3 IL 
0028A2 6002 1589+ SVC IDLE ALLOW ANOTHER PROGRAM A CHANCE TO RUN OO0O28E4 336A 1706+ SRL 13,3 POSITION INDICATORS IN R3 IL 
1590+* SUPVR WILL RETURN HERE OO28E6 4424 25D4 1707+ VA OPTN1,R4 SET UP BASE ADRS IL 
OO28A4 6002 159 1+ SVC IDLE ALLOW ANOTHER PROGRAM A CHANCE TO RUN OO28EA 4C63 1708+INTR1 TBTS Re, 2M) SET INTERRUPT RECEIVED IL 
1592+* SUPVR WILL RETURN HERE QO28EC 4C28 1709+ TBT R4,CS IS 'CS IN PROGRESS! ON IL 
0028A6 T7DA1 0001 1593+ AWI 1,R5 ADVANCE TIME OUT COUNT OO0O28EE 1204 1710+ JON NTR2 * YES, BCH AROUND UPDATE IL 
OO28AA 18F9 1594+ JINZ xf£o8 BCH IF TIME OUT NOT REACHED 0028FO0 C328 25DD 1711+ MVB R3,S10IN+1 SAVE INTERRUPTING CC CODE IL 
OO28AC 4C61 1595+ TBTS A ae SET ON ERROR CONTROL BIT 0O028F4 6F0D 25DE 1712+ MVW R7,S1SB SAVE INTR STATUS AND DEV ADRS IL 
OO28AE 68D2 0000 1596+ B ERR "NO INTERRUPT! 0028F8 1713+INTR2 EQU * IL 
1586+ ance nae ee ne eeenenne eaeeenen eo EU ERR ODT A cau ae cee 3R EBT OE 1714+%* CPCL R5 CURRENT LEVEL COPIED BY DCP IL 
1599+* OO028F8 3521 1715+ SLL 4,R5 POSITION INTR LEVEL AND PUT IL 
1600+* SUBROUTINE OO28FA 0501 1716+ ABIL 1,R5 * IN "I BIT IL 
160 1+* OO28FC CD24 261A 1717+ CW SINTL,RS IS THIS THE CORRECT INTR LEVEL IL 
1602+* I/O EXECUTE ERROR HANDLING ROUTINE 002900 1002 1718+ JE INTR3 * YES, GO EXIT THIS LEVEL IL 
1603+* 002902 4C66 1719+ TBTS R4,$LE) SET IfffR LEVEL ERROR CONTROL BIT IL 
1604+* PURPOSE 002904 4C61 1720+ TBTS R4,ER SET ERROR ON I/O COMMAND CNTL BIT IL 
1605+* 002906 4CA2 1721+INTR3 TBTR R4,XI WAS INTERRUPT EXPECTED IL 
1606+* THIS ROUTINE WILL COLLECT INFORMATION TO HELP DETERMINE THE 002908 1204 1722+ JON nTRX * YES, EXIT OFF THIS INTR LEVEL IL 
1607+* PROBLEM THAT WAS FOUND WHEN THE I/O COMMAND WAS ISSUED BY THE 00290A 4C60 1723+ TBTS BS MT) * NO, SET MYSTERY INTR CONTROL BIT IL 
1608+* SUPERVISOR AND IT WAS NOT ACCEPTED. 00290C F304 1724+ CBI R3 ATTENTION INTERRUPT? EL 
1609+% 00290E 1001 1725+ JE TftRX YES IL 
1610+* CALLING SEQUENCE 002910 4Cc6C 1726+ TBTS 1 NG) ERROR,UNEXPECTED INTERRUPT TL 
1611+% 002912 6006 1727+INTRX SVC XIt EXIT THIS LEVEL VIA SUPVR TO PGM IL 
1612+* SUPVR WILL ENTER WHEN AN ERROR OCCURS ON AN 1/0 COMMAND U7 2p RS eER Dre Tate tre cen trees con pena nre ee se ata treater spate eens LOek 
1613+* 30+* 
1614+* RETURN CONTROL 1731+* THIS IS THE CONTINUATION OF EXECUTE oe AFTER THE INTERRUPT 
1615+* 1732+* HAS BEEN SERVICED. THE EXERCISER FIN AN INTERRUPT HAS BEEN 
be a B (R6) * RETURN TO USERS ERROR HANDLER aaa RECEIVED AND BRANCHES HERE TO CHECK FOR ANY ERROR CONDITIONS. 
16 184 2 ROR OO OR oO a gk Ro ko ii ok ico kotok dak kcaok koktote ak ack 1735+* 
1619+* 002914 4CAY4 1736+XIOCK TBTR R4, XE) WAS AN ERROR EXPECTED 
1620+* CC O= DEVICE NOT ATTACHED 002916 6ACO 0002 1737+ BN Bor at * YES, EXIT THIS ROUTINE 
1621+* FOR 1= DEVICE BUSY 00291A 4CA8 1738+ TBTR R4,CS) WAS AGTO CS IN PROGRESS 
1622+* I/0 2= DEVICE BUSY AFTER RESET 00291C 1006 1739+ JOFF IOCV * NO, CONTINUE CHECKING 
1623+* 3= COMMAND REJECT 00291E 4&C2A 1740+ TRY ae CE) ts c& IN AN ERR CONDITION 
1624+ 4= INTERVENTION REQUIRED 002920 1002 1741+ JOFF Toco * NO, BCH 
1625+* 5= INTERFACE DATA CHECK 002922 68D2 0000 1742+ B R6) * CS ERROR 
1626+* 6= CONTROLLER BUSY 002926 4C69 1743+XIOCO TBTS R4,CSA) TURN ON CS STATS AVAIL FLAG 
1627+* 7= I/O COMMAND EXCEPTED 002928 5601 1744+ BXS Beek GO TO USER 
1628+* 00292A 4C21 1745+XIOCV TBT R4,ER) WAS ERROR INTR CONTROL BIT ON 
0028B2 T706E 1629+XIOER CPLSR R3 COPY STATUS ANY LEVEL INTO R3 00292C 100D 1746+ JOFF Locx * NO, EXIT THIS ROUTINE 
OO28B4 336A 1630+ SRL 13,R3 POSITION CC CODE TO BITS 13-15 1747+ 
0028B6 C328 25DC 1631+ MVB R3,S10IN * PUT IN LOG OUT AREA 00292E C520 25DD 1748+ MVB SIOIN+1,R5 GET LAST INTR CC CODE 
OO0O28BA 68D2 0000 1632+ B (RG) * RETURN TO USER ERROR HANDLER 002932 F502 1749+ CBI 2,R5 IS THIS CC=2 
16 34 4 8 RK RIO RO IO OR ok oii coioioioiko ie totoick geiotok ok tokok 1 4A PR 7 6** 002934 1003 1750+ JE x foco YES 
1635+* Ly 002936 F506 1751+ CBI 6,R5 IS THIS CC=6 
1636+* SUB-ROUTINE IL 002938 68D1 0000 1752+ BNE (Re) * * NO, BCH TO ERROR HANDLER 
1637+* IL 00293C C520 25DE 1753+XIOCQ MVB ISB,R5 cet faST ISR DATA BYTE AND IF CS 
1638+* ERROR INTERRUPT RUNS ON INTERRUPT LEVEL *$INTL'! IL 002940 6A00 284E 1754+ BN XToc$-4 * AVAILABLE, GO AND GET IT 
1639+* LL 002944 68D2 0000 1755+ f5e * ERROR 
1640+* PURPOSE TL 002948 CB25 25D8 1756+XIOCX MVWZ PTN3,R3 CLEAR OUT OPTION 3 CNTL BITS 
1641+* IL 00294C 5601 1757+ BXS (R6, 2) RETURN TO USER VIA REG 6 
1642+* THIS ROUTINE WILL BE ENTERED WHEN THE SUPVR DETECTS AN ERROR IL 1758+* 
1643+* OR THE INTERRUPTING CONDITION CODE DOES NOT AGREE WITH THE IL 1759+* I/O PARAMETER LIST 
1644+* EXPECTED CODE. IL 1760+* 
1645+* TL OO294E 19D0 1761+IOBLK DC A (DEVADD) ADRS OF DEVICE ADRS 
1646+* CALLING SEQUENCE IL 002950 28B2 1762+ DC A (XIOER) ERROR ROUTINE ADRS 
1647+* IL 002952 0000 1763+IODCB DC A (*-* DCB ADRS OR LEVEL & INTR 
1648+* SUPVR WILL ENTER WHEN AN ERROR OCCURS ON AN I/0 INTERRUPT EG 002954 90000 1764+IOMOD DC A (*-* MODIFIER 
1649+ IL 002956 0000 1765+ DC A (*-* ADRS OF LAST SVC CALL 
Weeaee RETURN CONTROL a 002958 0000 fae sone DC A (*-* SECOND WORD OF LAST IDCB 
+ +* 
sees « SVC EXIT RETURN TO USER VIA SUPVR at sree INTERRUPT CONTROL BLOCK FOR I/O COMMANDS 
+ + 
1654 42 OR lok Fook ik i lok doigok lok lok iaiuiok icokok tok dokotok aka detototak tek took kao dokkok TT 00295A 19D0 1770+INTBL DC A (DEVADD) ADRS OF DEVICE ADRS 
1655+* IL 00295C 28E2 1771+ DC A (INTOK INTERRUPT OK RETURN ADRS 
1656+* CC O= CONTROLLER END ISB O= ADD STATUS Bia & 00295E 28BE 1772+ DC A (INTER INTERRUPT ERROR ADRS 
1657+* FOR 1= PROGRAM CONTROL INTERRUPT BITS 1= COMD REJECT IL 002960 0003 1773+INTCC DC X*0003! INTERRUPT CODE EXPECTED 
1658+* INTR 2= EXCEPTION INTERRUPT FOR 2= INCOR LENGTH IL 1775+ RR IG IG IG CII RR RI daa kak tok i okotok 174 AY 7 6* x 
1659+* 3= DEVICE END INTERRUPT INTR 3= DCB SPEC CK TL 1776+* 
1660+* 4= ATTENTION INTERRUPT 4= STG DATA CK IL 1777+* SUBROUTINE 
1661+* 5= ATTENTION / PROGRAM CNIL INTR 5= INV STG ADRS IL 1778+* 
1662+* 6= ATTENTION / EXCEPTION INTR 6= PROTRCT CK LL 1779+* CONNECT INTERRUPT CONTROL BLOCK & PREPARE DEVICE 
1663+* 7J= ATTENTION / DEVICE END INTR 7= I-FACE DATA ry 1780+* 
1664+ LL 1781+* PURPOSE 
OO28BE 706E 1665+INTER CPLSR R3 COPY STATUS ANY LEVEL INTO R3 IL 1782+* 
0028C0 336A 1666+ SRL 13 POSITION INDICATORS IN R3 IL 1783+* TO CONNECT THE INTERRUPT CONTROL BLOCK TO THIS DEVICE AND 
0028C2 4424 25D4 1667+ MVA ogni RY SET UP BASE ADRS IL 1784+ PREPARE ON THE DESIRED INTERRUPT LEVEL AND TO ALLOW THE DEVICE 
0028C6 4C28 1668+ TBT c§) IS CS IN PROGRESS IL 1785+ TO INTERRUPT. 
0028C8 1006 1669+ JOFF ares * NO TT 1786+* 
OO28CA 4C6A 1670+ TBTS (RU. CE TURN ON CYCLE STEAL INTER ERROR IL 1787+* CALLING SEQUENCE 
0028CC 6F0D 25E8 1671+ MVW R7,DEV SAVE CS ERR ISB VALUE, BITS 0-7 IL 1788+* 
0028D0 C328 25E9 1672+ MVB R3,DEV4t+1 * AND THE COND CODE IL 1789+* THIS SUBROUTINE HAS THE FOLLOWING ENTRIES: 
0028D4 500A 1673+ J INTRI TE 1790+* 
0028D6 4c24 16744+INTES TBT Hiner XE) TEST EXPECTED ATTEN / ERROR IND TL 1791+* --> BAL SCONC, R6 CLEAR DEV DEP STG AND CONNECT I/O BLK 
0028D8 1002 1675+ JOFF BCH IF NOT EXPECTED ie 1792+* --> BAL $CONP, R6 PREPARE DEVICE ONLY, ALREADY CONNECT 
OO28DA F304 1676+ CBI RS IS THIS AN 'ATTENTION!® INTR IL 1793+* 
0028DC 1006 1677+ JE R1 * YES, BCH TO END INTR SEQUENCE IL 17944+* RETURN CONTROL 
OO028DE 4Cc61 1678+INTET TBTS (na ER) SET ERROR ON I/O COMMAND CNTL BIT IL 1795+* 
0028EO0 5004 1679+ J NTR1 IL 1796+* BXxS R6,2) RETURN TO USER VIA REG 6 IF OKAY 
1680+* THE ERROR INTERRUPT USES THE SAME IL 1797+* OR B R6} * IF THE DEVICE COULD NOT BE CONNECTED 
1681+* ENDING SEQUENCE AS THE NORMAL INTR IL 1798+* 
168 342k OR OK mo oO I ok a OK ook lok kiki ictal ack took APR 76IL 179 9+ 2K OK OI III OOO IIR RCI IOI IO I I IO I II I a Fk Kk 2k akc ake ak 
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002962 OFO6 1800+$CONC MVBI 6,R7 NUMBER OF BYTE TO CLEAR 1915 * 20 * 40 4) * UO iy) * 4O 4) * 4O 1) * 40 1) * 
002964 QBO00 180 1+ MVBI 0; R3 * AND THE DATA TO USE 1916 * INDEX * INDEX * INDEX * IND * INDEX * INDEX * 
002966 4524 25E2 1802+ MVA DEV1 R5 * ALONG WITH THE ADRS TO USE 1917 * 00 * 00 00 20 * 30 18 38 * 20 10 30 * 10 08 28 * 00 00 20 * 
00296A 2BAC 1803+ FFN R3 (B5) * 1918 * 01 * 02 01 21 * 32 19 39 * 22 11 31 * 12 09 29 * 02 01 21 =* 
00296C CB25 25D8 1804+ MVWZ Opt 3,83 CLEAR OLD CONTROLS FOR NEW ROUTINE 1919 * 02 * O04 O02 22 * 34 1A 3A * 24 12 32 * 14 OA 2A * O4 02 22 * 
002970 4724 295A 1805+ MVA INTBL,R7 SET R7 TO CONTROL BLOCK AND 1920 * 03 * 06 03 23 * 36 1B 3B * 26 13 33 * 16 OB 2B * 06 03 23 * 
002974 6014 1806+ SVC CICB * CONNECT IT TO THIS DEVICE 1921 * O04 * 08 OY 246 * 38 1C 3C * 28 14 34 * 18 OC 2C * O08 O4 24 * 
002976 6AD0 0000 1807+ BN (R6) * ERROR RETURN TO USER 1922 * 05 * OA 05 25 * 3A 1D 3D * 2A 15 35 * 1A OD 2D * OA 05 25 * 

1808+* 1923 * 06 * OC 06 26 * 3C 1E 3E * 2C 16 36 * 1C OE 2E * OC 06 26 * 
00297A 8828 261A 2952 1809+$CONP MVW SINTL,IODCB PUT IN LEVEL & INTR PARAMETER 1924 * 07 * OF O7 27 * 3E 1F 3F * 2E 17 37 * 1E OF 2F * OF OF 27 * 
002980 4724 294E 1810+ MVA IOBLK,R7 SET R7 TO CONTROL BLOCK TO PREPARE 1925 * 08 * 10 08 28 * 00 00 20 * 30 18 38 * 20 10 30 * 10 08 28 * 
002984 4020 25DC 0708 1811+ MVWI X° 0708", SIOIN INITIALIZE CONDITION CODE STORAGE 1926 * 09 * 12 09 29 * O02 01 21 * 32 19 39 * 22 11 31 * 12 09 29 * 
00298A CB25 25DE 1812+ MVWZ $ISB,R3 * AND CLEAR OLD ISB VALUE 1927 * OA * 14 OA 2A * O4 O02 22 * 34H 1A 3A * 24 12 32 * 14 OA 2A * 
00298E 6E0D 25E0 1813+ MVW 26 LSttO SET UP ADDRESS THAT STARTED LAST I/0 1928 * OR * 16 OB 2B * 06 03 23 * 36 1B 3B * 26 13 33 * 16 OB 2B * 
002992 600C 1814+ ae eer * AND CALL ON SUPVR 1929 * OC * 18 OC 2C * 08 OF 24 * 38 1C 3C * 28 14 34 * 18 OC 2C * 
002994 5601 1815+ BX (R6, 2) RETURN TO USER 1930 * OD * 1A OD 2D * OA O5S 25 * 3A 1D 3D * 2A 15 35 * 1A OD 2D * 
A114: SERRELS ce 4Ee 0458 5499055 Se EOREUROA TE erate cy ohn o cece eee eicxe 1931 * OF * 1C OF 2E * OC 06 26 * 3C 1E 3E * 2C 16 36 * IC OF 2E * 
1818+* 1932 * OF * 1E OF 2F * OF O7 27 * 3E IF 3F * 2E 17 37 * 1E OF 2F_ * 
1819+* SUBROUTINE 1933 * 10 * 20 10 30 * 10 08 28 * 00 00 20 * 30 18 38 * 20 10 30 * 
1820+* 1934 * 11 * 22 11 31 * 12 09 29 * 02 01 21 * 32 19 39 * 22 11 31 * 
1821+%* DISCONNECT THE INTERRUPT CONTROL BLOCK AND LOG ERRORS 1935 * 12 * 24 12 32 * 14 OA 2A * OY OZ 22 * 34H 1A 3A * 24 12 32 * 
1822+* 1936 * 13 * 26 13 33 * 16 OB 2B * 06 O03 23 * 36 1B 3B * 26 13 33 * 
1823+* PURPOSE 1937 * 14 * 28 14 34 * 18 OC 2C * O08 O04 24 * 38 1C 3C * 28 14 34 * 
1824+* 1938 * 15 * 2A 15 35 * 1A OD 2D * OA O05 25 * 3A 1D 3D * 2A 15 35 * 
1825+ DISCONNECT THE INTERRUPT CONTROL BLOCK TO THIS DEVICE AND 1939 * 16 * 2C 16 36 * 1C OE 2E * OC 06 26 * 3C 1E 3E * 2C 16 36 * 
1826+* SET THE "NO GOOD! CONTROL BIT, THEN LOG THE DATA THAT HAS 1940 * 7 * 2E 17 37 * TE OF 2F * OF O7 27 * 3E 1F 3F * 2E 17 37 * 
1827+ BEEN FOUND TO HELP THE OPERATOR DEFINE THE ERROR CONDITION. 1941 * 18 * 30 18 38 * 20 10 30 * 10 08 28 * 00 00 20 * 30 18 38 * 
1828+ 1942 * 19 * 32 19 39 * 22 11 31 * 12 09 29 * 02 01 21 * 32 19 39 * 
1829+* CALLING SEQUENCE 1943 * 1A * 34 1A 3A * 24 12 32 * 14 OA 2A * OY O02 22 * 34H 1A 3A * 
1830+* 1944 * 1B * 36 1B 3B * 26 13 33 * 16 OB 2B * 06 03 23 * 36 1B 3B * 
1831+* THIS SUBROUTINE HAS THE FOLLOWING ENTRIES: 1945 * 1C * 38 1C 3C * 28 14 34 * 18 OC 2C * O8 O4 24 * 38 1C 3C * 
1832+ 1946 * 1D * 3A 1D 3D * 2A 15 35 * 1A OD 2D * OA O5S 25 * 3A 1D 3D * 
1833+* --> B SERRS SET 'NG' BIT AND CONVERT DATA TO LOG 1947 * 1E * 3C 1E 3E * 2C 16 36 * 1C OE 2E * OC 06 26 * 3C 1E 3E * 
1834+* --> B SCONX RETURN TO MDI SUPERVISOR TO TEST STS 1948 * 1F * 3E 1F 3F * 2E 17 37 * 1E OF 2F * OF O07 27 * 3E 1F 3F * 
1835+* 1949 * 20 * 4O sv) * WO $}) * 4Q s) * 4O 4) * 4O sv) * 
1836+* RETURN CONTROL 1950 * INDEX * INDEX * INDEX * INDEX * Tf xX * INDEX * 
1837+* 1951 Ue ten ee ee ee 
1838+%* B TURTN* RETURN TO MDI 1952 * NOTE s' hig SECTOR 32 eer oa RESERVED AS AN ALTERNATE SECTOR AND IS* 
1839+* OR B (R6) * IF THE DEVICE COULD NOT BE CONNECTED 1953 * ALWAY nee pees BEFO t ND * 
1840+ 1954 * NOTE ~ 1 = LOGICAL SECTORS OF SECTOR AS WRITTEN ON THE FILE * 
18.0 143 OI GOOG OIG ICI CII I a IR IS IIR a IOI ake ak ak ak 1955 * COL 2 = RECORD# 1 AS CODED IN DCB FOR WRITE/READ/SCAN OPS * 
002996 4020 1818 8000 1842+S$ERRS MVWI X' 8000! , TUSTATUS SET ON ‘NO GOOD! STATUS BIT 1956 * COL 3 = RECORD# 2 AS CODED IN DCB FOR WRITE/READ/SCAN OPS * 
00299C 4724 2B66 1843+ MVA HEBLK, 4 GET ADRS OF CONTROL BLOCK 1957 * * 
OO029A0 601A 1844+ svc HTOE CONVERT HEX TO EBC VIS DCP 1958 * SECTOR ID FORMAT AS WRITTEN ON FILE eo ae * 
Q0029A2 4020 188E 4O4HO 1845+ MVWI X'4O40!, TUWOPK+116 1959 * WORDO ORD1 * 
0029A8 4020 1890 4040 1846+ MVWI X'4O4O!, TUWORK+118 1960 * tere? SECTOR #) Atoabe ae YLI Eee * 
QOO29AE 4020 1892 4040 1847+ MVWI X*4O040', TUWORK+120 1961 * 07234567 =89101112131415 1234567 89101112131415 * 
OO029B4 ODOY4 1848+$PRNT MVBI 4&,R5 1962 * FFFFFFFF 0S SSS 5S 5S 0 OHHHHHOC CC COs Ce € * 
0029B6 4324 181A 1849+ MVA TOUWORK, R3 SET UP BUFFER STORAGE 1963 * * 
0029BA 6BOD 2B5E 1850+ MVW R3,BUFbT 1964 * * 
OO29BE 4124 2A3A 1851+ MVA LINE1,R1 TQ G5 (RR a eR oH EK OK OR KK OK KK RK kok tok ka kK ak ok ai ok 
0029C2 OFO4 1852+ MVBI 4,R7 1966 * 
0029C4 OEOD8 1853+ MVBI- 8,R6 1967 T7AAA TUIT SERRS 
0029C6 2B24 18544MVBUF MVFN §83). (RY) 196 84 3 OI GOI IOI CG COR om ieee 6 FEB 7 64 * 
0029C8 OQOFO4 1855+ MVBI R 1969+* 
0029CA OA4O 1856+ MVBI x*4o',R2 1970+* TEST UNIT 
0029CC C258 1857+ MVB  R2 grt + 19714+* 
OO29CE BEFB 1858+ JCT MVB F,R6 1972+* MANUAL ROUTINE 12/04/78 
0029D0 OEO8 1859+ MVBI 8,R6 1973+* 
0029D2 7921 002C 1860+ AWI 44 RA 1974+* PURPOSE 
0029D6 BDF7 1861+ JCT MVBUF 1975+* 
0029D8 4020 1802 FIFO 1862+ MVWI ats PID+2 1976+%* THIS ROUTINE WILL FORMAT, ASSIGN ALTERNATES, LIST TRACK ID'S, 
OO29DE 4020 19B8 2B64 1863+ MVA FAKETU abCADD1 1977+* DATA RECORD ONE OR TWO PEST (RRCRD SELECTED SECT-HD-CYL. 
0OO29E4 4020 19BA 2B60 1864+ MVA DC2PT @DCADD2 1978+* USING THE PARMETERS (C{L, HEAD, SECTOR) SUPPLIED BY ‘TUINPT®. 
O029EA 402C 19C4 0080 1865+ OWI BITOO80,SUPSTAT 1979+* 
OO029FO 4324 25DA 1866+ MVA S$TUID R3 SET UP BUFFER STORAGE 1980+* CALLING SEQUENCE 
0029F4 6F13 18BA 1867+ BAL TUMSG HERE, R7 GO TO MESSAGE WRITER 1981+* 
1868+* 1982+* *TUINPT® oe IS AS Beretta 
0029F8 1869+S$CONX EQU 1983+* ary We yee E(1 - SINGLE OR MULTI SECTORS 
0029F8 C720 19D0 1870+ MVB DEVADD,R7 GET DEVICE ADDRESS FROM MDI 1984+* O0O-TEST 00-NO 
0029FC 6013 1871+ SVC RICB RELEASE INTERRUPT CONTROL BLOCK 1985+* 01-FORMAT 01-YES 
OO0O29FE 6812 261C 1872+ B TURTN* RETURN TO MDI SUPERVISOR 1986+* O2-ALTERNATE ASSIGNMENT 
1873+* 1987+* 0O3-LIST TRACK IDS 
002A02 0009 1874+BEGIN DC A(0009 NUMBER OF LINES TO PRINT 1988+* O4-LIST DATA RECORD ONE OR TWO 
OO2A04 0008 1875+ DC A (0008 LINE LENGTH = 8 CHAR 1989+* 
O0O2A06 5C5C40C1C2D6D9E3 1876+ DC C'*x*x ABORT! 1990+* IN MULTI-~SECTOR MODE,TEST OR FORMAT WILL START WITH THE SELECTED 
OO2AN0E 0028 1877+ DC . A (0040) LINE LENGTH = 40 CHAR 1991+%* LOGICAL SECTOR AND CONTINUE TO THE END OF LOGICAL TRACK. 
002A10 E3Z3E4C9C44OCOIDE6CID 1878+ DC C*TUID IOIN ISB INST SECT ID DATA CSCC * 1992+* 
002A38 0028 1879+ DC A (0040) LINE LENGTH = 4O CHAR 1993+%* BYTE (2) - FLAG BYTE ae yaa) Re ae LOGICAL) 
OO2ZA3A 4O4OKO4OLOKO4LOHOG 18804+LINE1 DC cf t 1994+* BIT FECTIVE DATA FIELD TWO OO — LOGICAL SECTOR 0 
Q002A62 0028 1881+ DC A (0040) LINE LENGTH = 4O CHAR 1995+* 1-DEFECTIVE DATA FIELD ONE 4QO - LOGICAL SECTOR 32 
OO2A64 C3D5E3D340C4UC3C2F 1882+ DC C'*CNTL DCB1 DCB2 DCB3 DCB4Y CHAD BYCT ADRS ! 1996+* 2-USER ASSIGNED DEFECT (THIS NUMBER MUST BE EVEN - SEE 
OO2A8C 0028 1883+ DC A (0040) LINE LENGTH = 4O CHAR 1997+* 3-WRITE PROTECTED DATA AREA CHART ABOVE FOR PROPER LOGICAL 
OO2ZA8E 4OXO4O4OUOFOSO4O4 18844+LINE2 DC ct t 1998+* 4-SECTOR DISPLACED SECTOR NUMBERS) 
OO02AB6 0028 1885+ DC A (OO40) LINE LENGTH = 4O CHAR 1999+* 5-SECTOR REASSIGNED TO ALTERNATE CYL 
OO2AB8 C3E260FO4OC3E2Z60F 1886+ DC C'*CS-O CS-1 CS-2 CS-3 CS-4 CS-5 CS-6 CS-7 ! 2000+* 6-DEFECTIVE,FACTORY ASSIGNED 
OO2AEO 06028 1887+ DC A (0040) LINE LENGTH = 40 CHAR 2001+ 7-ASSIGNED ALTERNATE SECTOR 
OO2ZAE2 4YO4OUOFOLOKOKOKON 1888+LINE3 DC Cc! ‘ 2002+* s 
OO2BOA 0028 1889+ DC A (0040) LINE LENGTH = 4O CHAR 2003+* Be BAA NERD CALINRER= HEAD# (BITS 1- y CYLINDER# (BITS 7-15) 
0OO2B0C C3E260F840C3E260F 1890+ DC C*CS-8 CS-9 CS-A CS-B CS-C J 2004+% OO-HEAD ZERO 0000-C LINDER ZERO 
002B34 0028 1891+ DC A (0040) LINE LENGTH = 40 CHAR 2005+* 01-HEAD ONE O4¥OI-CYLINDER ONE 
002B36 4OUOKXO4OEOKOYOKO4 18924+LINEY DC cf t 2006+* ETC ETC 
1893+* 2007+* OA-HEAD 10 2967-CE CYLINDER 29h 
002B5E 0000 1894+BUFPT DC A Bree 2008+* 10~FIXED HEAD 0 41FF-FIXED HEAD cyii (511) 
002B60 2A02 1895+DC2PT DC A (BEGIN) 2009+%* ETC ETC 
0O02B62 0101 1896+FIXTU DC X'O01018 2010+* 17-FIXED HEAD 7 SDFF-FIXED HEAD CYL# (511) 
OO02B64 0101 1897+FAKETU DC x*t0101! 2011+* - 
OOF1FO 1898+PIDMSG10 EQU X'FTFO! 2012+* aa BYTE (7) -SE ae ON/OFF 
000080 1899+BITO080 EQU x'O080! 20 13+* - MODE OO-DD= DATA PATTERN FOR TEST 00= ,91=ON 
1900+* 2014+* » MODE 01-00= ID TO BE WRITTEN NORMAL nor’ USED 
190 1+* DATA CONTROL BLOCK FOR CONVERTING HEX TO EBCDIC 20 15+%* - MODE 01-01= ID TO BE WRITTEN SKEWED NOT USED 
1902+* 2016+* - MODE O4-00= LIST DATA RECORD ONE © OO=OFF,01=ON 
OO2B66 OO3A 1903+HEBLK DC 2a} NUMBER OF BYTES TO CONVERT 2017+* - MODE O4-01= LIST DATA RECORD TWO OO=OFF, ,01= ON 
OO2B68 25DA 1904+ DC auoek FROM ADRS 20 18+* . 
OO2B6A 181A 1905+ DC TUWOR ) AND ag? TO ADRS 2019+* PROGRAM PASSES STATUS OF TEST OR FORMAT TO MDI AS FOLLOWS: 
1906 COPY ei 140CT77 2020+* - NO STATUS RETURNED 
1907 PEM ERE GS ERTS $4 ce xK GS EES SORES ERG te ew iso hh an eee 2021+* 
1908 * PHYSICAL * LOGICAL SECTOR AND RECORD NUMBERS * 2022+* RETURN CONTROL 
1909 * SECTOR# AS * (SEE NOTE 2 BELOW FOR EXPLANATION OF COLS) * 2023+%* 
1910 * CODED IN * * 2024+* B TURTN* RETURN TO MDI SUPERVISOR 
1911 * WRITE/READ CORO ok MOVFABLE HEADS aOR FIXED tx 2025+* 
1912 * ID pee * * * * HEADS * Ss ea a ala accel ah 
1913 * {HE * * : * 0- 7 * QOO2B6C 6F0D 261C 2Q27+T7AAA MVW TURTN SAVE RETURN ADDRESS 
1914 *kK ee eee aaa 2 ee he ee 002B70 4020 25DA 7AAA 2028+ MVWI SAAR? STUD SAVE TU ID FOR DISPLAY 

















PAGE O7A 
COPYRIGHT IBM CORP 1976 


375222 


EC= 


P/N=6839424 


GENERAL UTILITY 


LIAPO === 


PAGE 07 


1976 


6839424 EC=375222 


P/N= 


GENERAL UTILITY 


I7AF9 --- 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


COPYRIGHT IBM CORP 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


fal ic) 
a 4 jam) 8 OG 0G (e 
ex (o) <x oOo fe Ceo he ~A 
= faa] = OG uy) A YU is A 
oa] a is] RG eo OG =) FQ «gt > Zz 
io) aH <x masz QQ pe G4 = (e) HE — 
Bi He i= ff fut < = So & = a —< 
© Ay Rei =< WHR At © ar Arf = 
FQ AA (=) wo = mam eH mm 1 & ow) mau) is) a> OG 
5p) ee e en et ei ca) > Ac Ww mo Wet fy OH mM re o) 
AMS mM rm ew =u mG ZA FPN wm AA aot Rew, © Zz 
is) HR Oo + [= + fx, = «<< < > oo | <— > cl AG A Ome Oo HOU 4 —< 
e fbi A 4 | eH = am N OFF AD =f ca —< Et Eite Mm «© ae 
<— O = UO ee C9) «i a fiuQ «et A Ax aA ica} HH & A ao oO « <t xt 
= OAA ea = iq ca) Ory A Ma mA <—¢ ARH BR wet = [a] hep k@) ma] ao MO UA 
GS ARH & AWN Os AN Ce WA [owe] SG He me Aza eH <k O> wh Get et = 
ica) SeM Zz am ed) = OD kO Hog HmooN fF & « | [oa] mo HO «<< og 
S&S 2H O& Khe eH GY HA xg xX moO SBE OC UO Sm ME CO Ha > © aH Os Ao ZO 4 fx 
A He BOBZAN 7p) cA ky WY aA Nes ARA HH Om k& FR AAOCZ & BAO UO e+ < OO ca) fone d oH = o> 
ro) OOH - a) H AUH VO FH AVUH os] CD Ry A mo ic rae) RCsH at mit MIKE “\N Ce al Yh = ro [a @) 
& nN Ak coy Q RRR ei AQ AHR ec OG « HHS AA ee AZzAC KH HH «HU O AN & HORM m me ON WM Or- 
RB ORM mH HO A UNH Ags OWN HO qe BOONES wnN HN HH a2 ReORN HW MmROm cA OC MNOS YH mM ee O HM™ ORA 
we HOOTOzR fie GU xe piky, [ob -4 WN epi, Fey OG BO OcHaA HOH ADO SARHMHSO bY Naa Re SS Be HO AR 59) y=] =e 
QO URBAHA ao Re -lio BAA KH ei ie) HM BHAnNRHOH OQ et fy CHO B@tmaMet hy = AN NM GS Cr favs ae HY Nm © & UO * 
xc Uma no 2&2 | WN AHA MYM U WAA 8c Fy eke UOFfWn Biel Rd OR KH &M AN OO @ BH AM Weis & >< a h@) DOO 
HSH NHHORNKH CU = & DA HN HA OMAN A NHN HM CHU cet <« «QQ RH MUO: Het RHO Ree MEeRRO Sec A KC BA HOA We & HOR 
HH NZ BAD WN Ge eH He am Me Be mW 2A Biel mM NAM BHOANBHHN QA Beas O4RmH HF WA = Om mOrecmuU AAR & © 
xa ODD ABA Oomma Or AZA Ons A=zM OmMmm eH SRRUA B-ROmMGNAR @ ROURHHHOAHY Ay wt MOR © 3 AOR BR et a mn H 
> cCOOHRay MUU0CA Gek Am om Am MUUO Ut BMctHmAw = meGHOsEAe SGAHEWOUOUOR FM 2D NA We oo Am BSB NCBMH HOR WU 
<x eOURMAIE: BA BAe OSH CAM HH ABH & =a ma Oo = OMAOCREY 2 OMAOCRNBONRAULUCHN & Ge mnm& - lH ONAARO = AamAA 
cm MHA MOM eG MA HR HW tc He HOMA oO HmemOnw He AAAI OR Kn WNOMOHNMNM fon] Ga ma AM fu A pm fy © Pr wn 
(=) b> A oOOnRA UO BA & YU aa wOOR B&B Z2BMOUDH = RAS Pm HOS ASA eH AeetQAQ A HD Aan Am =& Mazo KH Pow 
= HAAS Fe WN AU RNa HOt mt HO Mnm HN MAP | NWN Meee | Neat 1 [RNY Se Mae am HN Amcteg PD 
H Ae HODRMA Z2OMOM BATONS 2@Wbct DOMSE BOTMO WMHtODMMONN DY DBZOOMNODH YPBONZAArRSH BOMANNOOCWRA a@HODmMMaDO WN BH WMOOHnCA 
RH NAMOMMNMH BZOSGH AHOBNHGHE RH OZNHGHE MSO ORBSHMOANCKHKHH HE HAMS SHH HSH NNMAHEX HSBOUHHSMBSOHAmM NBHNNHN Hes A NUK 
[aa 
t tH 
' Wn 
is) WY 
A @) 
© Ay 
= NN N N N N a+ 
Pee MN te oo N - o + fas ~ 
HH ++ he + + Ne &B + + + N fsa) = a cg 
= mmm mm O A (a) \O + Oy an mm 28) wo ea) ~ an eg + Ov joa} = 
A OOU OU 4 e = He ~ Ha ae OU 1S) ae :S) O Or + oN S&S io) IC ON r) '@) + 
= AAA AA e a me & e Cake HH A wo AA A ia) A A A+MN N + N N mo N+ eH A m 
= NNN Nh nN 1S) Mm YU nN ap PU BOR Mme & yn NG ee] =MO A OC A AA wa AS an 1@} 
O meme me O n N mn WM N U Me HN PGs +>> > (©) +> > NEO Me N FH He Se mHN A + A NA 
eI eee & WOR -~ Om - mbOm ~ b Se mt Om & - e re ®& em M ew» wom ea e Mm wow e& - MAO. Om se A . > oe esto Wi om a + OO 
YW see ON GAH of GA a OnmRAK. AN = OMGMR. eo Ge Ores NM+ Use & GRe ~ & Ue GMRe UUMe S2MGRe MN e Mee <a a +GNe SG Mmmerom mo 
YN boast ete OO CO Wm © NU We N+ © WU ewe oO Oo NOG +¢++H AOE iem oO Arm efgen MMOs a = af al) © -~« © NO AO sto « BH Bf etNM OU & 
= NOOCHUAARRANOKERANOTMNAEMANMMUNONDARHANORORQOMMOCOMAMA BORK HM ERKRIMOMRK Gers AMKNNAD WE eMsrmMNDoD YW oMn 600 fa at Fe Oat —-= NHOMNAR 
VSOPNOUHA COCA SHON AA 8s SUNON MHA BDNORNHNAN BytOUUBROPRCOPHO "DOP OPRIO MEUM ROOWHA BOQ SEIbINHRNOTOOO OBO ORM OQ «Sn MUD 
H AOCOZHOARS BORMMASMOSRS GMAT EStADOLS GARSTEOQMSHORSTHODARAHR WCOQROSTZOZDSE WQKHhOtSDDYAwOOCOUAKRS EZtENZUCONEONSESOHRMAIOUE U em HT EM 
es Me OTN ~MNe AGN. NG S~NMNNe NE sme NVe Nie & NNGD We & Be BN NNNe Ge GUN © 8 me OAG™MNNGN. NOKe NKAe Nie DNMe AN MH oOOmmanNn 
OSS A A om ee RG cy er) A ed vc Stem Dc ees dF TEU) ed ect td ect 0G FG ed Bt eal id res Ba eed ect (1) 4 eclectic Ed fd etd et cet ee ce SG MUA & 
KH 
He CGR, Ry few <a ep) mam WH BW OGiy = iy Rue fe N HH Mipg Ry Mi REG By Rte PGR4 & Pe Pry freq WHY he Fa 
BEER HHA SHAH Se He RH ORR HHRMA BH HSe WEY Bee BEE eee Bm RSH eis OHmHEZOnHs Ss TOO Ba HH 
PrrPe>r>atOoMOSZOCUMOSONERUMOM>S> FZFOMERCQUMOZO FEOMMZOPE Pr EPPrMU>rOMOOZO FE>RMU>MO FPPrPrr>eUMOAMOZOSHEO S$ FOMN>>amM>> Pa>OOm> 
= ZBEOBEOQOHDHOMOHMHRHeMOHOHE HHA MQ HO DHMH GHP SS SNS DEOATHOHSP OA EMA SHMMOS ESSE SDMA MHOHOOUNHR MOSHE EM EEM [HOH ets 
os wo > N N ian) —+— ~m i g Ww) oO A N 
— © N N (oo) N N - -) oO (>) ] fae) fo] 
= = = = = = = = = = by = = 
7p) wn wn Jp) wh nO Fp) WN YQ 7p) ep) wn yy 
7 HH ot XG «< «< = x —G «G «G « “—< HHH HH “xX 


MATPWNOMDHOPAM TNO DHNOEHAMSAMNOPS DNS KAMAN DHOKAMSANOFSDHNOKNMSTNOPDHOKNAMANOLDNOKAMAPNOEDHNOKNMNANORDNOKNMANORDNHOKAMANOLDHNOKANMsAMNYw 
SSSA TSTMMNMMNMNMNMNMNMNOWOWO OOD OOOO EEE EEE EE DOODDDDDDDDNMNANANANNANHOOOSCOCOCCCCO FPP PKK KKK OK NNNNANANNNANNAMMOMMMNMNNNNMNs sea SSTTPTTTNNMNMMMMWN 
MANN NNANANANAANNNANANANANANANANANOANAIAIVOIN AIAN AIAAIIN AAAI ANAIAIAAIAIAAAIANAAN AIAN ACAI 
NANNAANANNNANNNANNANNANNAANANNNNAAAANNNANANANAANANNAAANAAQAANANAAANANAAANANAANAAAAAAANANAANAANANANAN AANA AN AAAAAAAANAAAANAAAAANNAANANAANAAAAAN 


osrt BE i) i) = a © - (on) <i® oo or - Co) o-=- - oQoostrs0O oo Oo UO oo ow fr mst 
wood MY © © (=) So © io) © zo oo oO owe - jo) Ne - oCQooceceek oOo nn © oo arm rH N or 
wooeg wovwo S (ee) So WwW @® © © AN fusr wo bk ® ©] © [oe] ew (>) Cooc kw Fe. Fa ON AS Ow Ok \O on 
Noo NN @ © © mM © © @ ro FAS N oo eS So oo fan) OQooomMmn N MN “=a ON om N om 
OOM a0vk10 row ON Cs Ba Oo WAN FAO tO Net <N ARM BOUst O set SHU UO SKatOORIOROU N wtrwoootr Oto wOoUUY sow «G «Oy fx) <t 
MoOAnohmMOU Onwr NE Ur N WO mo oOo’ fI-r SH NHSTFT VAAHO HOW NO SFNHNVNO DO wehwonhyAwoga Fa Se INFMDHMWO WOOO OAD fuastA nww AC NM 
wonovorwovor WO ww Wetee) mW wo w o~ won WON AN oOom wowowwm wo AW MWWD oOo NNMuUsToouorm fy WmOste hk, ehify WONDER fkisto Fano Wo)Xe) 
NANANAN GY NNN MN AN mM NN ANN NN Ne TN ANT ANNN NNN MANN NHN MOANMNAANMN N MAMMMAMM MMM NEN MMM NNN ANN 
DOOMDOMNO MH LYMNOMO COD ARI NMNOKHSMOM Mi AANW KH OMOHDMNKNAMCDOM SC ADO DMUVWOTONMNNHAOMVOCTONDODTOODMOUENMMAOMOMONNNOM-K-rODOMRODON AMD «eMac 
ANNONNANDD EK NOON GONDNANON AOM Ne NONNON BONS ANNDNNANAMNANNDANNDAN AON FPONNODANAOONNANNNNODN aOONODNONGNODONNONNNONANDG OONTONN 
DOS HOOCANHNVGCOONNU OO VUSOHMNU GU DOCS YO NIN YOODODDO VO DOOYOO MWD OHNO UDONDOORING UDDODSCOCOCORNVOCNUGCODDNDDOODOOCO VOOHVEOMMO HWRoUcDCoO 
OAFPODNCANS RK TOONTOTPRATAPONTOTFON STS AONAKPONOFSCASseterHDVUNMOAPONSAOTPCOStAONSTTOOPATPATPOONSTKHotOtODotrwnstrstanotsrsrwo Woeoxrrast 
BOW YUOCUW VON SOVUOTVODUNATOVONAD dONDAOUNVDAONOOMPOODNAPOUOSFO MOM AOUNSADRIOST AOPOURINOONOASAHONSOeASTONNO AAs eONsraeHowwuU SCroOHMona 
BOOTH TANANANANAM MMMM Sat FANNIN NOOO OOE EERE ODDODHAVAN et et AMOMQMMQUUVUUAR AAR Dike MOCO T TCH NANNAMMMMNMMST SFAMNMNMMNWOWOWOREME ODO NDNA att ct ti 
VAR AAARAAAAARAARARADAAARAAAAAARAAARARAARAAARARARARRAARRAARRARRAARAARARAAARAAARA AR RAR RA AAA AAPA eR [cafcaicatcatcalcoica| 
NANNANANNANANNNANNNANNANANNANNNANANNANNAANNANANANANANANANANANAANAANANNAANAANAANNNANANNNANNANNANNANNANNNANAANANNNANANNNNANANANANANANANANANAANANAAAANAAA NANNANNANAN 
DOOOS COSCO SCOSOOSN DOO COO DOO ODSO SDD OOD D OOD DOVDD DOOD OC DSTO DOCTCO COCO DODDSCODDOOCDDODDTOOSCOODOSTTCOCODOVCOODCOVOOCCTOOCCOCOCOCOCO Ooo000o 
OOO OSOD OOOO OOSOS SOS SSSSDOSOOSOOSOSOSOSSDDOOD DODO DO DDOODCO DODO DCD STOOSCODODCTDDOCSCOTCOSCOCOSCOCSCODODOGOCOOSOOCCSCOCOCCOCOCOCOCOCOCOOCOOCOCO OQooo0oo 
eI mm 
mQ UO 
AA OG 
Oo ica) 
= HH BE o# jo) Fa 
ma [aa = + > 
eH HemMO ica a aA eH (ve a} Q 
1) OULOA > Law = (ve A U (ve 
FA, HAA a Zz te (We a2} Aa ica) ica] A 
yard 2 mu A fy © as QQ ie) fe O 9) mM & 
Fon mo 8] 4 H t) < a a fo x 1S) im «ot 
moO AARmA fey = ic} oO fy O Sq ApH Am Oo A 
O [ony onge Je <1 et ie) J = = co) Oo Om (ve Fy < 
za .S) ro) fx 4 ro) <a mM =A, A zQ jaw] <> a =] 
HAKM AAA <3) Pua = Co = me eH © 4 eo We A Ma 
Zr a HHH eine | H A 'D) a) rea) ao zm re O MH rea) fx 
Ulan me HA HA WM + = a wn | [oa] Mm CG + ei fa <= Ne & =m NA 
a > rc NNNWNAL [e<) am WN & <p) [o) O p O AA GH is | mo mU an! 
RAO Ab dH NNNNBH A ro) MH AAR Hm WN Oo cz eH OFF O=r + WN fy mu Za 
GHe pUeck = AAAAHR « AH Ee eietecc <x isa] a jen] O Ae & & Ke nN S Soa 
nN O He O Beate OHO WM AR AR fon] <te Fi (4m Man ORO & = Aa C aH is) 
ma HNO m& ww BH AAAAYSU mMOUR oO ZGmn aa eo (te (Ve ca yce| ore) YO He MUAH FA A a H #2 A GB FO =H 
AAO A@aA CO W eet H RAQOAAUR om NN ~ = FAO H <—_ MA A Ae Nam Nem H HH © Hee we O OF Feat WO & 
Bh BWA AH Act Qetetet A: A mma RaW Ge OF NN HH A NO = UD ADTs Hao & [oa] BE UO a O Uc A WN 
9 a) BE NHUcde] ibid =U AN BemeA Ce OO H A «g& OC fF Ss UO A = Beate HH Be BH RA & G@ SS HU #N « 
eH 1 SEN UR R-tk — HH ON AG ha Ae ee < FR «iat NM AR NH A SB A MM fxu Ke mM ae A CUOMO mM Oo fF 2m Ne © Oe = 
Orem WMAA NR AAR AAR Aco H He U YY GBeAQ wee oOo nN HE: 0 OOM URLS &® & Ba Es Oo OF 
AMA MUctacH OQ aia Cea hy RyRy, ct fy ROoOArH qy AAC Be oe eH & BH eee m0 O HH O ME HON O RM wSOomoD & UO HO Fx AN 
Ax UsZzRRa2Z0UZ0RA= Ly FS Fy Fy Py A WO«« HH mn GSH nn Nn Hann MBA WA aX ck CO WN ANA HF Aa > GZ ARM & A BZHARNA Mm 
[2*) 4A mmMO Seat mmo eq DmeooDpman 2 Roo je Sem 2aO Hn eH RH WA << —>u cacao] aq He See AM HN © eH ARAN D NN AH @ 
Mam WH aeH onl mA MOmmMmMra O monte DD Om gH vA eH A BAe Nt ke ES For mead oo cE xt fa] ! = fue [a2 
<O NAAN NRAARN fl pc TIA Mma f wera eq mt HH O & SHAR & GH CO WHA O AH RH HH HORA O 
BRS NDRAmHNNP AN A=EAtQAAA A BZ2MOHMIAA wo BH Sn Re RN RK GG EA Bie | oH AVULSRH a) Ce Hak QB mg CHORE He Gm lee 
RAG PSM OURD AU Xt NAM eteteties > OR MHN it RS BHAX GBrNNNMNSNONWNS MBMN= HH ANLUMN Coie] MeOH NHHAN f& ORBHBHAEMNH UANAH UO 
NOR AHH A SRA HaSRHAe HMHFHOOOQCORHODPHRMmaAaHOO SORMHODOHMOMOCRIOCONOMA OND mS 24haew CAQNCACZHAeAARMAazN NOnAAeeweAD azazawaMe 
Pha SE Peg Fg bd AG EH Py Py QNURA AN URSAN Hm ee AU ett BO Se MSH ADORNS ee KNOHHE RAH AS NARFGMAHE RAH Doe WN 
Nat - N N oO N 
++ + N + NO - + + ™ 
starts Ho H™ A+- + +H oH + + & 
$$ +40 UN H 4 A, Ay z= H iM NH = U+OeeR Zz O++ Zz H 
mmm s Av GH GH BH HH A eA ei Au A BN H AMAMH H AMM H uy 
YUOUUUND mH un n ae & HH > @N O FM bP nNONLUD D> MUU =) ro 
TOe ~~ -~ AARA oH ee i®) U = @& B&B DP PP oH Fe + = ee =AZzOH HH BAA G& 4 
mah ©] © ee ee 119 Oa IrMOnN © = weak on CO | e &H fq e > =a N © eM 9M © Om baal AG AGO ome * UO » 
= 8 SBZVAMDOHAOENANMNENONNMMEG+t5—e WHA. +¢+¢GRe NNN AP D D « «& cere AQ Oe FH A AB +2%= Uribe Be Gh = —ESTRA = OFF = - 
emUR HH SXMARITNNMNNWWINA es 8 eHHO OC 8G HH SO ARO KH HH Ff &- oot O mE ~~ & <a H+ N+ act ~< wh OG Do + eG — AN N i) 
am fy ASH OOM MMOM MMMM QO wAO Re OMRAANMOrROAR MO eH EO ee ENP COO MONENHD BH AMHOrHOnOROCOOURR StUAASRA OCOFfXCNUKMOO OS 
On ~eeeeeee eee eee eo 8 GEIHHDOD MOO WA ese URe RAs MRK MOMAMRMOR KHNM ACHMADO FG BVPOOMNHOHRKNAA MOUNT NHHA ScOeZURNZOO 
BO” OMONDS sett ststtes tts satststsaSS MHRA OMe eS ARASAGHHOROHTWMORANIAMNENAWNANAO COCO H GBMOHOHAHS OC HASONMHRHOCNOCTNRAARDANESEHONMMHADHDOONM OOM M 
ORE OUMNNSWMO MRM MUA De ON RR EDH™—= BE es OM RHENESEOAZAZHU eg &-&— NO Be KAS SH Om DMO HB SAR Ge BEEK NM.] NMAGME~MAe O wOVUeN HH /- 
amnnno-:e--~--:e:_-~-*-””7_~"NO 1101 OH itl RH tN TOMOGRAM PdX a Seo HNAN OS BIW © d ge Au ot P< 00 et et SE OS ANO ROS 
oro 0404 05 05 9 RO og ROH mW faa) Gab WN Py Fu H o fy fae} fy 
FPO DDDDDOHRHHHHHAHHHRHHHR Hee ete tHe SEM Ae eH MH a 1 SSAHEHORES EHS HS Wee BSH Oe 
ZNAQ COOOCIOIOIOMANMMMMAMMMMMMMMMM>S>>>>r>rROmdtUMOrrctUlZOPSEROMMQAMAMAAAMA UUU SzeOQO Qh: ~ PPR EOS rrr EORCOMO FOP Sr aeUNOCZzOSSERS U 
RRA RARH HHH HHH He HHH HHH SSS SHH HMMS SMASH HOMOMOMUALHNM AAA = MeMmON«drh = SEOKGVP eS SS RHNMOAHMOVaeMSSBOARMHMdtOUMaAM A 
Ow Zz A fry >< BA mak MO - © oO - N = So) mM 
ZZA OW fr e) fry H nnn + + WwW wn st = on OV .S) 
He O Gt oO = oO <— Ez ei He & Hi a) e fon) OV <> 
% Qa s fubaH es =a 7p) = Ht ie Oe HH HHHMG few) few faa) H & *W 
++++ 
DOTNAMATWOPDNOENMANOP DNHNOSCNAM ANOM DONO KAMPNOM DHOCTAQ\MNHANHNOKRDNHNOTAMSFNOMODHNDKNANMATAN OPDNHNOSCNAMANOPMDOHOKNAMTANOPMDHNOSCNAMTANOPDHOTNM SNOOP OHOMN 
AMMMNMMNNMNNMNMst +tAPAPAASATANMNMMNNWMMNNMMOWWWUO OW DWUE EE RELEEEK DODDD DDDDDNHANANNANANNHSOCOQOO 0000 OFS SCCM TEE EKANANANANANANANMMMMMMMNMM ns += 
elelel Mlelelslelelelololeleleolelelololel=) slelelololeleilolelo)elelolelelelelololololeleleloleololelolelolololelelelelo(slelol el alalal a] a] awl) ak ad ak oak al od ek kd lk el el 
NANANNNANNAANANAANANANANNANNANNANAAANANANANAANNAANAANCINAANANANNANANNANNAANANNANANANNANANANNANANANANNNANNANANNANNANNANNANANNANNANANNNAANANNAANAN ANNAN AANNAN ANNAN ANNAN ONAN 


ONNSASs HSC om Oo otro ono © © © —- Mn “U0 OO e—moreto CO mMO« = AN ON 
ONNeKK0Oo \O fu o oCco rst tr st St oc t+ Oo mk CO OFMOhO Oo mUrR Co ot Oo 
COWMINMAMMOG aw 7- oot rnnn an on Oo Wo © COWWDCU- N Www Oo CO Oo 
DANMMNNSs MN o ooo - Fe re eK = on Oo NN CO OBNNONG NANA oom oO 
IN ot ct ct ct et et CL foe) WOOMN N Fan ff] ONOMAIE: © COM Oo « Ogle OOVOMRth = — gConocaU RFIMOMWO O «tO 
Aw wocanm as fea) OttrMm oO wWOwoO OH sthsrAsNnmM “ar & = SFRmOt WMRONMS N oO sNhROUOs => Pa Pay fe Fy FO 
elo) TOWOWWDG ™ AMAMO wo wero O OUDMOLUPRLY OV rn UO DD DOr wWWOtwowon oo Mm DAMoOswowo MAMWWUAW UY 
NN NANNNANST N ANN ON MMN N ANNMNMAN N Or N & TANT ANNAN WN MQ FMAMAN MRANNANNAN 
smo UNW OR HOK NMA AH MNODCCODMKK—MUO KF ODDMUOMQMONMRKDBDMOWOMOMOMoOMMN COs MaAWM MAN DOMMMADDOOMMMNOrOotMNODDOMOKOMOMNHOAN O 
Noo DAAAAAAAAAAANAAAAANANNAANNNONOD BONNODANODANNNONANNONONONODO oOo ON BN aN By NNDNDANNNNNDCODN dOTNONNNONAONDNNONG © 
tO VUVUVUVUUVYUVUUUUUYU UYU UU UGODOCCOCOOURD YU dDORINGDOODOSCOVUGSCODODODOOD mnm HOOOCCoSO DO MUOODOSODODONANY dOODODONNUGODOCODOD 
ON sacssatssrarssctarsstas st sts TT SKF ONAOODD ONS ests rszOrDUcCmDWODWODMKO COCO worrorsn OWDOVAKADOASSASTCHONTON tODOAONTODPOoOtrTOTO M 
WOE UNDTORIONTWOONAUNRONSTUDEUNONDASAAOUUROTODUNDONAIFOUNDMUNS A AATONNDsA HON SORIOUWOR COVYUOCUODNMSTAOWURINATOMUNOUNDUNOCOA eStats © 
PE KKK THK KODDDODDODAAMNAAAAN tate MMNUVUVAARAAALPARARmaMOOCCOFTKTTrANNMMM Mss statostinMunwy WOOFER EDDAANAAN atta QOMMUUUUAAAANAAR mk 
DAMM DOCCCOMADMAMAMAMAMRMMAMMMMMMAMOMMMAMAMAMAMMAAMMMLVVUVUVUVOUVULVVDVDOVUO VUUD VUVUYUVU0L0UYU VUUUVVVVVUUVUVUUYULUUYUUUODUUUUUULDUULUUUDU UO 
ANNAN DODDOONANANANANANAANANAANNANANNAANAANNANANNANNNANANNANANANNNANNANNANNAANNANANNNNAANA NAN ANNNNANN NANAANAANAAANNANANANANNANNNANANANANANANNANAN ON 
DOD DOOD DOCODOCD ODDO STOOCDDDDDODDDDCD DODD ODDODDOOOCDOCOCOSCODOCOOCSCOOCOCOCO O8cO ol elolelel ere) DODDTODOOCODDOOCOCCOCOCCCOCOCCOOCOCOSCO OS 
DOD DOSCSCDDSCODSO OOOO DO SCTO OC DODOODOCOODOODTOOCODOOSCODDOOODOOOVOSOOOCOCSCOSCSD oOo olelelalelele) DOOODODODDDDSODDODOOCOOCOOCOCOCOOCOCOOOCOOOO CO 





PAGE OBA 


COPYRIGHT IBM CORP 1976 





375222 


EC 


6839424 


P/N 
STMT SOURCE STATEMENT 


GENERAL UTILITY 


OBJECT TEXT 


LIARS = 2= 
LOCTR 


PAGE 08 


COPYRIGHT IBM CORP 1976 


375222 


EC 


6839424 


P/N 
STMT SOURCE STATEMENT 


GENERAL UTILITY 
OBJECT TEXT 


LEAR SS Se= 
LOCTR 


(re (> 
& op} ia) a 
OU a HI 4 
we ~ 2) et op) jas} > 
fon + mM MN OM is e) 
Cc BR a < Bm ioe) = 
=! 1S) < 4 A Qo ms OU 
e UYU yn ~m UO e NW AN A WO ~ (oe) ie) 
O fw =z 3 Oo mn eM =z WH al a] m 
oOo Nn ioe) is) © nN (eo) > oS no «x won 
I & = re a ++ oO NDS Ae 4 & ‘e) 
Go « [ea ® «<< iq mam OM UO ma 4H Ub « isa} ~ “< el [<9 7 -«} See «x A 
oO UV — MO O wm Aa oO fF wo is) “~“ nm ~~ ~ — — «t AAHe fear] is) 
H He nN << OU H ANN H NO « op) q n UMNWR& e« ~ + + de Oo GH 
O mma Axe ic | A Hem A Y H UO - ~ I FADPHOH AH Ha- ce OH OU 
= & WHY =OAa a YN PJ CAnWM Ha Fu 1] cqMe: A WN bei ONO G@ HA wD > A i e A BA 
& Nama Ree it) HH CH WNGHO = BN 4p) Pp 04 BOW 1-4 OO H Wn eH PQ thd tte 
&  Ofu a HA OUHA OO @ H H aad e) > AO m =m oOo ms Ae aa) H OW A 
& AR BS ZW & fF AQ BRA HAHOR UO we AAW A mn eH wn) Oo ag Amftor = m=eO =m HF Os ee FHM 
& COOH A He me He eH OW HW @Octh fF ei =M ~_— ~— A > A a rt fy O “9 MRA a =< = A ar & al 
- UON=z (=) OQ OO YS On UR- Pu << Uc me HE HH & | Oct me wm B& tO i=) H a < OU BZA YU 
HUI  t a od at <3 a oe) A OMB HHNRk eS Ae HH WA Ra HE uit Hee a +tO WN & = HAA AH He 
RB OD plat ic ARO Ar Ue FH Ol & © a A SHAY A A ANMm F RMN Awa OH FRA SHH COHO HH 2 AA DBP <e PAA, <> | 
CO OHO «<« AE <M YN FAQ = & AD OCFRA me UNF = HA” = =) ZH «te A @_mm UU BH Ge eS Am 2 & mM Wm 
eat HOS gy OF fF OWN Hse > OA OUR BAN™ HH on He O<tee [aioe] 2a] MeFAUU am 2 AR e 5 wn 
1a) Rem @OOM © MAU N N= MH OM Ay mM Samay mma a «2 AM Sa @&@ AARm YANORDYO BEQ AHAINAO A DO wf CO MO A Wa 
“< HR BP CA N & AR ine] Wm e Ce He MG Oe G&G @2UWAAR OCOUEHSAABH OH EHH > HABA ARG HHO Ne ce GH hm 4 E4 Hee ak A 
Ay 2 AX A O DSR Rik Pa<2zO 2 BO HA AMaacA HARN MetNARHN Mena sZO ORO YN 22H OUONA <a) n UU A UO © ADR << «G 
& Aema OMAR o& <> Fa) BH BN BORK AAAS OH AM HM UO €@etNHAdgaA cH AeHA KOO NAH < AxOH CT WM << @22 wm cOm 2A 
=e ZOgageH GB AMZ 2 O A OUAEz Mmwnwnu «ct HHOAH&e aqahmann HAeHAAMN eet Ie ANNASa OO AAMmHOG& ser AQ Ff} ON & Om 
<< WAM mM eH BM HN ic) A << (<M AMO BA = AO me epoca ei ep sacs) an! MD SO BHA Go tet A YU mm BY MHA 
UO GHAO AMAA B&B 5 YO Bae Se eH DO Ge fm BeOM A & THON RHA RH CORR 1 HO oo & A > © =A oe ee) = 
MNO Me HAgzee HS HHS US BAHN HHA Pate HOKNHHHNHOARMNOHHNHH NHR OR ees AAKHHS &«— HH ANH Met & HH BNMMNM 
cSAAOrnS eOkhe BOmMmmO NACNODS AAA AZOMNOMma <a et AMA GOWAN AAmmmeee Xe et HHHOxK<MORRMO HOR <—BN DA ZORMHODP aah 
UOFAOR Ot cose eNO AG AHORA WO RHONA NERNNNU GMa DMAHME SAMO MAME EHH OMHANNON Me HOUMA ANNOERASOXKK HN FR ABU SH mh 
- = ae 
4 + + + + ara ~ + st 
+ za ~” aA ~ e- (Q Ava + + + + + 
[ea - mG + H A - +0 Ore = mamuU mM ma mM 
* zr oO * + 1) BH & tei ~ io] i) UR an ~ ANS wl UUR U oO vO 
> =aa > < Ar << A td N N Mo = - OO a > AAN A A A 
<x MO- + OM «a UO oe) =z mM aa™N [on] A A NA faa Ann mM UO mn Nn ~ mr WN Oo WO 
[94] ++OAm a A & ei - MR5 — te eH osx ~ =. ~ eee = Bev [ae] SG Ge & [oa nee] 
= ~ANUO we nme > Mean oe & oy ve) MAtTO wae WOO en OOm™ OO, OOM = ATMNNO & =P. eee lm ae bd bad » ore » Ue / 
- UVUAnNT RAH New [<1 <>] BH +0 ef & - =O @e©& GG A atGMeO e@ RD MO eM BAW op) +++ FIN Hee Nee mrPn = - Cd = [Re Ft . Zio es) 
fry AAM e+ Mme NO . = es HWM Ornm + om Or AHH wm oe lf eal of) ~ wf «G Hoe e+ mi mt Fey +OO e+>5 + ie © + A HE ~ 
REMAN MOM EMAMOStA WH -) SITAOMMON « AN SSONOTOM SK MAPDOOAMAMKOMMrMeKMNONMrPWOMm KARA UO BmRAOCtTHUR © MNO CARROMOmSTAe MN 
RES =e eHOOMASTEATODRASE VERA BROOCOMNALGENTHOLO wr HENS TODOS LSS stSBOSPSDBASTHSEAOOHHWHGS mG &§ ONOmP HOS mMIAORMMOCOOFTARTATOA storoodo 
NN WINNWM eM e~mNme NO 1 ei AND MNe &§ F MN) Me MN NUPMONe GN NOAMNNNMNNAMNNMRNNASUDDDUEd © MMe Oc & de & OMMMWM & we Me Mew BMP NORE Ge AE 
ST re (5 0G OGG AG dt a NH Um eee a a FDC ct ce ah GE teh i ace Gt wh de os Gt Sv dt Et etd U0 0G Ed Bd U7 SO) 4.00 BE dE BF es BE 
xg 
eI 
4 Fea =a fe He eh A ey RY HR Rabe fr Fy [oe BH Se fu 5 Fey fy 
HH H One=aty HRHH < oOo » 0 EH Fy HY i SHH SMO RHE YAR SAHARA HS AMAA RAHA SRA SSRN OH Hy es be 
SEs Sere rrr cncONnOMm:zx > HH OOR>P MOP rznan PNOrdt Pere >OOr ae eMOeetMOteMOKRMMO MO Frere PHM >P ESP rr OP aPMmorHnoaszhs MOrmmonzhsey 
U<ennSSSSemarxmrx7onzanm YN HAOMBHMOLANMOFr HSE SAMS SDAMOSHHSOMHV OOH OMHRV MMH HS MSS MOSNNSLOM SSS MSOSHSIENNONOS BOSNHMHOMNUNM 
op) 
Aa A A AAN w mw uw m WwW Wrvo Wr \O - N ~-m ~ ve} = 
= = = SEN = a2 = = = Sz == = oO © N oO © (a) 
mn wm nN WONG WN wm Ww nN mn Ww nn nn op) é~ ~ io) ~ ~ ~ 
cS «ft GQ eC HHH «tt < << «tt << G —S «g «G aH =a) eH HH al H 


KAM ANOEDHDOSCAMANOLDAOSTAMANOFOHDNOCAMANOMOHOCNM TNO ONOSCAMAPNOEDHOTNMSTNOMONOKAMANOEDHOSKAMSFNOPDHNOTAMANOMDHAOCNMANOPDAGCEANMs 
SEEKS MKM|DDDDDD DDDDNHAAAAAAAANS SOOO COQCOO SPT ST KOCH ANNANANANNANNAMMMMMMMMNMNMN ss ttt tS TSTTANMNNMMM NNN NOOD DOWD HOUSE EEEEEEPODDOMO 
AMAMMMAMMNMMMAMMMNMMMMMMMMMMMNMNNMNstsast aaa asta 72x02 23x7 sar 3tz4t+5s 5339057 sz 4g93 S42 32749 3 4¢¢4¢¢ex3 3475 ese 32 9s 44 245° ¢¢7 9s 93959559 274¢39 459° 449299937239 S593 2275I54S4>2 
NNANNNANANNANNNANNANNNNNANNNANNNANANNNANNNNNANNNNANNNANNANANNANNANNANANANNNNAANNNANNANANANAAANANANANANNNANANNANANNANNAANNAANNNNAANNANNNNNN NAAN AANAANANANANAANAN 


26F0O FFFF 
26F0 0004 

F 

F 

0 

2 

0 

rm 


BINM LDODDODMNDM eK sOUTONN 
MON AANNANNON dOMWMENOO 
CDODOONMNNWDODAHVOGUDSOMO 
Srsrnr VUVOATFOONSKrsSAMATOW! 


OMOOO gHNONMAOeGOUMOWODRIN 
TmrANNANANAM CM = = at ST ATINMUIWINO 
wlelelelelelelelolelelelelelolelolelelo) 
MAMMNMMMNMAMMNMMAMMAMMMMMNY 
OOoOCocooOcoeococecoco0cooo 
eleolelelolololwilelololele)lwelolelolelo) 


oN [0 oe oO cd 
oO = a =>) ee) oO 
ow Nn wh i) oO 
Oo WN - mM So oO 
Oo mow < mM yortne 
i Aon wo = ONKO OO 
Oo woon ar oO NOhOeG WwW 
N NON HN &- MOMoe mM 


0240 
F 
3 


FNDOPOCO 
Om BwOoornst 
BrONnon kia 
MOANAMOEAN 


3F94 2040 


Octo Noo «aN Nf 
sor MN OO ma 
KG) Ry = hy 7) Fa a as) 
OMN TN TN ON 


or U em 
MhaO fey 
wwodr - 
NANM oO 
OUMAUFR NON 
forts Ao Wri 
QOD IOV Rn nn i g 
AQeCeernmy Nar 


MAMAMNANNN N oO 


oO a] 
We) fey 
\O - 


2660 0400 


we at 
G WY 
© [@) al =a fi & 
=a] eH UO UO U 'o) 
Dp = fq cs] 4 f 
«<< << Sp) nN 2p) Ww 
i ' 
aA an) (an) a GH e & 4 
few] faa) faa] fae] 4 4 | 4 
© oO [o) © 4 tt «c at <i 
©) sat) | < O FO | oO ic) Na) [e3] fa ica] oO 
i fae ie) eI ae ica ei 4 He A =a | fA =) 4 ae He A zB 
Ge mma me es) <l xt [o-h ad aa N ea) OK ma tH << isa] ica mM ~M ~m OR mS eH 
<<. e «<G UA Coe) e «<< ie) © ic a] ae N “G a << fq Q 
Aw maGwU e<) aa! HU BAGGY ies) Neg © «€ 4 4 iow) 0G ee) «tg UO «a 
iH AZAH <> | WRG op | ZAHM [<2] wn =a) [<2 ae =| uv? HA Oo fx FA fa un? eH Se 
A al PNAH > ad 52 mH ePNOAH > WY Fox Om Ka ra H > Pa > YO Re GG 
79) Oo an AO u> Nn Oo an AO yy Za A Oo OeiND AO Oc AO A Za aA 
AGO UA Oo RO wO AO OA O <at @) a Oo CMA 9 PG G O << FO YU FAW) mam O Or mA ORG 
GZ ltt [eaqc) Oe Coe cg ct = ea) A A GMOMmZ A MO > Mae fag <>) Fo mr A A MOB A MO 
Fao foods 2 t-E es) cates) Ona cai ds) mR caToos A eGA OMO sR OG eG MEAS 4 [caTow] me ca Tow A reGH OO of OF 
aot 0G et ct Pz aR a Zi PG eG Ky >= amORm mmUMme mom = 1 ZrO ine] zm ZG >a mORm MReUme mm 
ei > AH OD [ea] UO * eal D> AR OD AM mA mak OS PAU OY fea] PA OD ABRAM mama maw 
Oa oO A YO MDuUOcd oA oO A UO <= 2A > BH NAP npn - IN U aD = N oO =A > F&F Nee B 
& “HA FAN HORN Gm & —HA FN A mMebHo Ei «oO i Ee mA FAN e4 -aA EIN Meth O H co ei 
< =e mM My & © <= Za mim AY Dp 420 BOM OU BD Rt =a GG RR MM << a Mm > 40 BOA YO HD 
Ae OC @G@HOH O « Gm MN HH WAH O CeHyOH O «i YN Beep wWOmaH wo =S HH OO eOctH O « =a H © MOH O « Bx R WOM WoO 
Bet mG AeU Met HOH UO Be Mm HHO Mets HeEOM DwWHHMm Hw <<. @& BORD Wee am AU Mice AROGm DOHHM mo 
2a GM @aeRO Maes AMORA WF ZA MBM AQABA Mats O Mev ao « MOB A CO BM CAMO MHS AM A me AAO Macs MeO moO «a mOsm 
O YH AUN Anam DR mn UY AY AUN Aaeam H A A MARA GMAm p YQ ANA AecQe Aa AWN ie AR A 2 GBwHAANM MmMAm& 
a a A bP PAW (=) Q A D> PP HB BB AIA B&B wID ~ aA A Dp A aA A Pp BH Be Fie & AIP 
Het > HAE SHIR Ae OO ORR Re OPH HOH BR BR tO ORR OR OR Oh OB Re FPHHeY HBANHHH HN 
AM @ ANAK BOMM WOONROCOAR AR 4B AAA ZzOmMR Kam 2am 2A Aw 42 Awe aOR A Oe oe Bee SOR ahem 2@2Rnmme eae 
OSee NNN MSG NUNMACKHNMH KE NNNGMERANM | NNMRZHKHHHENSEHHMHM NKMHE ME NNN SNM NE MHK NN GH KANG NNOEH AHBNSHAPH 
N N 
= ~m => = - s+ =a x ~- —s 
- + - ad r+ Lad =a toad =z - =a + - 
[ea] Q+ m +O m+ WN = OQ + ~ +> = + 72) -m + 
1S) UM UO mo Um (=) +O mM + mM + ~ A +O mM 
a AV a UA AO joa] MAA UO mM O fea] UO & AR UO 
Ww wa N © AW wa Oo NUR NA NO AN NYU A Oo NUBG NA 
=) av + A NUA AY UO +Az + +2 A+ +A a OU +Az + 
OR wow Re N mame Me MRR Kew BR, ON Go Bie OR YU sOhe Sq Ra — GDH RX N cmG Raw Mm ew Re N BG BCEw ORK VU wore, 
Oo gm OF ame O Get“ UNO em OMM mm wo = mma Arma Asomm OrAnmtmam wo Awsomm woromam wo H eee Aewmae 
KOM mer OMR<m NHOUDAN QR UORARK Qe humm <— NiO RR mk, RR Ame OMRAmmmo<mM AR RRAINM mm ef RO em Ok ee 
Och] A Deh wa «a CM ODO eM Dea wm fe HH COPE meh aa CID ek] eH em 8] 8b 8 Mmm ef) eH 8 ek) wt HO EDT HA AONE OBA WN 
NHR BSINOHRSTS STH MaHIMAMNHRIESANMARsese MOomMesrm mmm MARTASTM wMwRasrastH MARATASTMNARATASEK a MOGMRIN MGmAANSE 
ee AWN Ge AA™aMNAa 1 WOOMTGEN De O™MmNMe ANR~RWUNG I A OAe SmWwRmANAE~Be I Omme™mAmMANR“~ mor | WA RM—MAMGMA KK AMIA OMe Srmmnmize—mea I 
OS eS OG GG a OG eh 8 OH HE GX -RMGACRHWH*e MES EMNS SH OMAR es 4 Oe 6 Bt “EM SHE 
fa 
= < 
eI make mhWN Fa a [aay < ai ley | mh =a Hi faa] joa) Mh) aay ESP man mw & ei [ee (2) 
Sea Bebe he SAMQHRHE EY Hee Be SOE ASA HS Soe Amat Bee Sey Beets BH SCE HSH] HS 
->ceOMOMr>>cOmOom rPetr>mosr> > ctOUNOMr>r>aUMom BSB Per cUnNOz> czUMO PrPcUMOMr> see OMOM FPreccOMomrPaeUMOM A PP retUNOz>almMoO 
ESMQARMHSEOARMHM BOSHMKSSOAHMHSSMQAHMHMN HH BSESEMAHMRESMAHOM BEMAHDHE MOH HM ee, Cee oe ee SSBSBMAaHMeSEmMaHh Aa 
on 
- <x“ N - on °  ® <] a = * ~M <~ N sm ON >< 
[en] am A [2] [oa ao = & m= He 1 ee & ee <= = = 
= = [ow —G faa] = = A A A A A A & & 
129} mw nN ee} WN wn Ww A Aa A A A Q [a joa] 
<x eG at < << GH HH x eG 4 [on] Cae fon Ok H = 


(NORMAL OR SKEWED) 


DETERMINE HOW SPECIFIED SECTOR ID IS WRITTEN 
THEN WRITE ID WITH ALTERNATE SECTOR ID. 


EHH KH 


CO SPT SE POPE NSA KH FO OW DDN FFF OO TH OO TFHeOO TFOOSFTMSTTONDHOOMNM OO SestroOtTOOSTOMMEKAMNtAONTEOMNtFetPwovow 


WOU RAS OD RINGO BONS O RON BANOO ONWU EORIN WO tf UO RINWOO RIN tO BHIONTODUNDAINDO AHIND dOCUNDONTFORUANS AONUDOMUONSTODUOCT 
WOOOCOrEEEODDDNNAAHAN dette tAQOMNIOUYOARAAR AAPA mm ROD DOC OCOFP KE TNANNNANNAMMM st tITMNNMNOUO COWS EEE DODDDMONAAAAG at ati 
elololelolelololololelolelololelolelololololelolololelololeleololeleleolelelolwlal alr) le) yal ak wk mak cok wk ek eek el oe ee ea ek ee eh dd dh 
AMM MNMAMMNM MMMM MMNMAMNMAMN MM MMMMMAMMMMAMMMAMMAMMMAMNMMMNMAMNMNMAMMNAMNMAMMMNMNAMMNMNMNMAMAMMMNMNMMNMAMNMAMNMAMNMAMMMNMAMNMMMMMAMMmMMMM 
SOSSOSSSOSSOSOSSOSSOSSOSOSOSOSOSOSSOSHS SS SSSSO OOSOOSGOI GCOS OS SOS OSOSSODOSOOSSSSOSSSOSOSSOSDSOSOSOOSCOOODOOCSCOSCSOOSOCOSOOSCOCOOOCSOO 
DOOSOSOSSS OOSSSSOSSOSSOSSOSSCOSOSD OSH COSTS OOOSDSOSSD SOOO SSOOOSSOSOSSSCSCDCODVOODSTOOSOSODODOOSODOSOODSOOOOSSOSOOSSODOSCOCOSCO 


OF SECTOR IDS 


GET CYCLE STEAL STATUS 

CK CRC ERROR 

NO-ID UNREADABLE 

TEST MAX OF 33 SECTORS 
RETURN 


SAVE THE RETURN 
INIT COUNT 


MD1 MVW 
BAL 
DC 
TWI 
JOF 
MVW 
MVA 
SWI 


WN 
<< 


ODO HNAMAWNICHONOKAMANOEDHOTAMSANOEDNOEKNAM SMNOKDHOKNMTNOPDHNOKNMANOKDHNOKAMANOLDNOK NM AMOK DHNOKNAMANVOEDHOCAMANOLDAHOKNAMANOLF ONS 
OUMOOODODOQODOD0DOOE EEE EEEEE EL DDDDDDDDDDMANAANANANNDOCOCOCO C0000 SPC MK OHNNNNNNNNANNMMMMAMMNMNNMSs SStatttSSTsTTMMNMNNNMNMNMNNOOWWNODWUKWUE 
NANNANANNANNANNNNANNNNNNNANNNNNNNANNNANNANNNNNNAN ANAM MMAMMMAMNMMAMMMMMMAMMAMNMMMMMMMMMAMMMMMMMAMMMMAMAMMMMMMMMNMMMMMMMMMMMMMMMMMmMMmMmMmMmM 
NNANNANNNANNANNNANNNANNANNANNANNNANANANNNNNNANNNNNNNNANANNNNANNANANNANAANAANANN ANNAN ANNAN NANNANNANANANANNANNANNNANNNNANNNANNAANANNANNANNNNANNANNNANAANANG 


oO ~~ 
~- oe 
o ou 
N AM 
OO UU oO 
NN AMON io) 
Oo Wwe io) 
NN NNN © 


SONTESaATONSTKsTO 


Aro UROWUONT00 
ammmmmuUUUAARAAA 
sat catcaicaica]cacoicaicalcaicsicagcsics 
NANNNANANNAANANNAN 
COoooooo00000o0 
COooo00000000°0 


i waz wa 

N Ore ~-r 

Oo oAaAo orf 

N OMN NY 
O ior WatuO UOseO © 
NO fy AMNN NMN © 
Ral WOOwow WOvro@d oO 
NNN ANNAN ANN oO 


ANDRAMNNHNOOMNUEK KF AQOOMNOEK EIN 
DONCONNNODAONANNDOANcaoMmoe 
RPMUOUDOCCOANUDUCORNUGCUM® 
OuoaorrstrrtoNzrerastroNteasro 


VOeretOMT AOArODaAOUNDVUAONS 
ARR BAA mMOCOOCOCOPT OC EEKANNN 
[ca fcaicaicalcatcaicaicals Peery cric ric ric wic Ric Mic meee wc ric H 
NAQANNNANANNANANANNAANNANNAANC 
DOTOSCODOCOCVDCSCOOSCOCCCCOoO 
SOoCOCCTOCOOCOCOCOOCOCOCCOCOCOOCO 


tO ot 
-oO New 
or Ou 
Mo om 
j<aF --f0ek@) ome O OO 


WAMANS 
1s SN oNotoe) 
NANN 


ADnS NO 
DOW © NO 
NANNN NO 


AOOMNOCFONGMOTON 
DNANNODN BONNON aoe 
ROOCHMDNUGCORNU RO 
OS arrooN sso ssp arvonNsr wow 


DUNDODUMSratozr0owoU 
NANANMMMOMSs sa MMNNW) 
Foe Foe Gag Fs Fg Fy Fey Fe Fg Fg Fg Fy Fy Fn 
NANANNANANANNANANANAAAN 
molejlelelaleleleloleloloia) 
Oooo0o0e00 00000 


— J aro 

- ON 

12>) moO 

ine) MO 
Oao HO o 
OV 0 fey Ox hy o 
futom wvorm oS 
ANN NAN o 


woroNnNsrrstsatONtAr sO 


OF AHONATWOUNWOGOUR 
OD OCH EEE DOOWDOO 
Foc Fog Fay Fry Fg Fg Fog Fy Fg Fg Fy Fc Fg Pe Fee 
NANNNANANANANANNANAANN 
COOCOSCSeoooo00o0o 
Lolelelelelelolelololololelale) 


= = 

- - 

[oa] U 

a) mm 

Uo ao oO 
POO By mr o>) 
iiorm o~ oo) 
NNN NN i) 


OPON Sera ron steaso 


NWO VUONSTODRINST WOO «x 
QNOV OD oc eG ctl xX eet} et FEO FO AN AQ 
Fg Pag Fad Fg Fa eg Fg fen Fa Fa Fs Bey Fy Fa 
NANNANNNNNNANNNANNANAAAN 
DoOCoocoooc00o0o00000°0 
DOoDoqOoO00O0O00000 


= ft a) ost 

=O AE 

Or Oc 

Mo om 
Oacou aan O >) 
FuNnNO OaNS i) 
Fuy\O 100 Wied io) 
NNANN NNN lo) 


ADONUOUKMNAOMOE AN 


WOSTAPONTEOPAPONTKwo 


RNORNSOOMAOetOF 
MVUVULVAARARAARRARA 
Fo Fae Fg Fig Bag Fong Fang Pg Fa Fg Fic Fg Fc Fey 
NANNNANANNANNANNAAANN 
OCooooocoooco°ooooe 
COooceoccoooco00000O 


2604 8000 
3 


AMNOM RAO rNOe 
COOANNANNANNSIN 
RONCONOWM ao 
WO0Ntettsths 


NWO BONS OMINWO 
fymimirioOOoOoreE 
fy fu OOOO OO 
NANNAMMAMMAMNM 
ODooooo000o 
COoooo000 00 

















PAGE O9A 


COPYRIGHT IBM CORP 1976 


375222 


EC= 


6839424 


P/N= 


GENERAL UTILITY 


PAGE 09 LIAFD === 


COPYRIGHT IBM CORP 1976 


375222 


EC= 


6839424 


P/N= 


GENERAL UTILITY 


LIAFS: o> 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


fq 
| 
9 - 
<< A B 
| | © Oo x a Oo 
be OH ac ae UY H Ww 
on Oam ~aceman N 2 3 U) td Qa Fry 
wm ow eet 1) WO ky ) (\- Baas 4 HS 
mam <i Maar Gro (> (« (\e Q BA WH O «a 
- N moO Oa ~A a A fen] MA Ba a A = 
a eA + ne oO HNZO oo BRI <a] & FQ (o) NS coOon-4 a) BAY 
<— «< AGHA a = AGH aHH ALU = Ac Oe KH H eH 4 AAR UHH =m 2N OC 
> 5 n aO He wl > Ho YU HA H HE. , +R Fy fy fry O Gx OURS Aim = 
Oo o > MHS WY fy = OWE oO e fea) cs Ne H Ke ei ® 29) ca AN HARMGR <M OM 
A rw] OU © mG Ra ( MODN& HA & O HA fA eh YU 1S) Ss) O eH a) 20) A Ns Nm OM a 
O QO Bm MMAO WM & es Aa Gene UO ARG YN HAMORR wo Hw WM wo A OR UO = YN «ca ez, fx) faa oO 
nn & = Oo MW HN Db O OO > YN HS AAA BAM S<HOCAaKA GG & G& & & & BHA 2am a > 0) fe] a BY HHOO FE REY fy 
> Dp Oo AO O ACP 2 = O Dp AMS ASRGHM OM UN FR AUN n ep) ie) Hman EYkim moO ME Hecei iy OO HU 
os A > O MRSA HH YO O AHHH nN UO « ANA «chia = Z =z =f OD am & [a9 oth) oe} *) Ge m0 = wR 
ak Ob UMW Bg ZHAUNH = H WAU HO4ZAM A ARG Bae HN AH AH WA WA heRAHe OWN eoy PR & PH Be HN +h MN & 
< <4 < Hn OY a «< Qa URRMHE ao CO HF HF OM i) - N HO AS Ha %FONMOR 4 WMmAaA BH = 
A A A BSH & AW AAR 2B & AH Hp AAS ica Be 2 NH wenmnaAnH ic FQ ca) BM Ras UO A Besa SRA We RHADH U*FZOik, © 
pS mS & Rh HOMO O ~ = HOR [oe] cs Tan ta~} me HO Tenet? GM Ge OO Ge mM Be NA a eA Ba PHONON [aa TimAoO ZAYAOH YU 
oO OU = ON UR UW Pa A USAR HHES AR MAHARHAOHO (e) © oO H2aHOR Natic <OOFN\NE A Bacto PAU HE] 
ep) mn © (cms B@ D ae) | ceca Rl «cg oO nN YU 2H A H A HH A HoH Ato BG OULD n) MAUOWM HAE Re eH > UNF 
OENZMD OD 2 BFNA BG MGM SNONMN UO BHA NR PORRH FP H NRHA RHHHO @ OU = O @ OU BAHH UO HARE Beet ZzOOU = NHHARH HHS 
BAMARHAOBZH HORIMBOD D HRSHON AAO SAAR] << AMAA eROMOO MOO FOO MOOR NMOR Amy CRAP RWORRmH me 0) FF 9 Bd 9 AMAORD wy 
MLNS RASH DOH HH ESHA SHDCOHOO NDNMNCHENHENONOUONUOUANSAHY NEA NEA NSAOCRNUQ NMOMt GBASSSCMRONNN NHAHNNNY = BAamMOARs*eM 
N 
2 A ad fue 
ic (aa) ~m ~- ~ + + + 
st i 2 = + + + a m 2% jaa) 
+ + be} NN —_——~ oN ei GH Sa] Ge ~ on O Fd NO 
fea) ioe) ee + + “= Ay oY Ay A, - N A +A +-+Q N 
O U > ma MMog = & = a =a = ™ & + mn man mam - 
aw oO UO vO nN OU UO UO a» no? SN BAm OAM Ge Ge BO GermrwoPnpn wo DP © DP OT wm » ww Om et A Wn Ar»s mma 
~~ FF 2S Se BG BG GB SB BB YO = HH Mm YU Mm wo ame UUe™” ~~ ee GH & He Be HH Me UO ee @§ GY - ee eee www © OD tOVNe MR Mate Mm mu 
O UO HH AA HH H = eH HH & nn) » = DoD SB Mee. AAO k* «§ YH ~ &©§ &© &8 8» © © oe m= AN FF BN ‘elelelelolelolelole) mu +UORBst we =z+Om ~O 
=a =& & FH BE HHS A SE ZB HH ~~ BGR OH n wm = AMOOMAONNNT| woe ORNe OFFMe OR Oe Gy MNOMWMNMs slelelolelelolasalele) NA=-MMAA WOR aMQQN wrt 
Oo wm ee aM UH eM BMOURHM aN WN a sOsOO GNM wor R™eaen SMOMBOOWOUOWO WR SOME ARP ORAEK EE ARNE A™OENOMOW «®& a OCOCOOCOCORAA NN ee MUNCONRA Gm FOOSE 
FORDE SeESIES KAM HOSeCsersresrrsNognrosree NH errr em © MOUBROLS &§ INGOSMEBOUDOHDODRHHRONN MY eBOMOoDstOW COCCOCOAOCN A et EHAROONMAMse HWOOCHMD « 
MOM Oem etm am BOR OEE OR OE NRO EERE AO BMG WOW” MNANMRKSH Ne NEN] NEN] NEN]W OO WON]! Ne NEMH Wwe & cweeee H ORNM Re Bm {Mice MEOM 
EA EO Bh et) TN et od 0 eed de ett det) etd dG ect et tee ed Bd bd bd od ddd ot OGRE UIO 1 SE BAH U2) et Py Gh 
fe 
fea) ae 
Fey Py n WN > fry 1S) 1/2) KH eH e H & foe] BH eH joa qe 
HH AHWR S ae BH eH ASRS YH Ye SF BR A SFRHAARMHAMAH RHSHOH FM can) QM AMMAN HH HeHa BH@2 Ett He Bees = 
REeASZzHMOsMOnmoszsh> OM M MOMO xf FRE MO PSPS tire r>seMAManmrer>sOe> OSA OAS OAS ePmb> = FEMoO ULLUVULLU0OU00U HF PNOPPrretOUNOR> >> EnzyS 
MNUMODAMMANMHMOUNMSMQHHAAHAAHMHMANMUMZAHMY a SCORE NASAONONADAEAONDNONZTMUMZYAONZAERNSMNYAEAHMM AARAAQAQARCHA HH BABB SZVMAHOQ BeDnNhwsaz 
H « 
nm - N ~-m © wo My NANOS mm © Om 
N to ~~ oer Mm om DD Oo we ~ ~ ~ wo ww WOnAAnMRAWOOrN F / ce Own 
- -—AN - - ee Oo = = = = = ss SH mHCOnNOU0U = \o ee 
~ ee ~ YE ~ ESP - WN Sp) 7p) sp) WM wm MON NOUUORAORIEIRA WN nN nw 
BH Be A&E BH & BH H AH BH HHH «t ce < C ro a He ASSO MHUNUUUI & He «<< <G <n 


DOPAMANOPONOSCAM FNOMSDHOSTNAMSMNOM DAOC AMNANOSDHAOSCAMANOMONOKNMNANOEDNHNOKNAMAN OE DANO KNAMANOMDHNOSCAMANOKOHNOTAMANOEDONOKAMANWOMDHNOKN 
DO DOO OO OOOO SSS KKK HK TNANNANANANANANANANAMMMNMMMMMMM st Fat FISTS TATMMNMNMMNMNMNMNMNNWOUOUWC OD ONUOERARREEEEEODDDDDDDDDNANNANHAANNAHOCOOCOCCOCCOCeKe 
LNW 1101010 1919 101910. 10.10 1010119 19 1919.19 10 19 10 (10. 10101010 10101 L010010 (L010 L901 019 10 L910 LWW OH DW OW HO WD WD OW WLO WW OL WD DW OL DW OW OW OD OW DOW WD WU OOO WO OUD UD DOOR EERE EEEEEME 
NNANANANANNNANNNANANNNNNANNNANNANNNANNNNNNANNNANNNNNANNNNANAANNANANNNNNANNNNNAAANANNANNNNNNANANNANNANNNANANNNANNANNAANNNNNANNANNNNANNANNANANANANNANA 


oe ~= o oO - © © - = [oa] m9 fea) (oa) ocootst Ho 
Oo wo (a>) Co wo Oo wo oO Oo © za or a fm More mu 
- i>) Oo wo Oo =~ WO o 2 loa) ion) ov Oo WOO Wr 
Oo © © oN Co ON o oo - ~~ - - Nome NN 
oOo © © NUONN N DBOON ASR fkiot <« UTrnNnNeae '@) Fy © am" fe N AA sto >) © yet Oa OSOEOOCm DOA 
Oo © \O Wawro ce woonwrw MOKOOD aoOoOnR oO uOOk \o Ve) ~ oT OO MW OO <G Mm sWNuN HOOMNGS OW 
ar = zt ros srs store TOOOO WOwconwm ss mOOoU ig n- =a Co Oo GO OF OO = 4 WiwWwvw eo DOWMwoowM wWMw 
mA mM (ap) ANMM mM MANMM MONND NNOM Mm HOON ~ ~-m m oN CO OM OO -m NANNANNA NOMNOM MN 
OD HN UMNDOUNN& HODNUMNAAANIM OOM HOON OMNS AMOOS BOON MUMNESPrOK MONK OQNAMMNEIN MRK HORKOMNAINNOMON COCCOCOCOCCO ANADOOCOMUOTONDOAHANA 
PNECNC CENCE NNONON DN WrOrOhnhNonoaArkaA ODNDOVWONANSTONONWN tt atONOMEKHNODONOCTONDNWOONSCSOFAOKUU COCOCCODCOCO DNENANNNODDNAOONNND ENS 
COSCO VUDO OUNVGODDD YOVUOUNUNGCCOCOCOHDDVUESO HOM MODODO OOOO Ue tO FDODRCODRICODROCCORIODWNODOCOCORURAO COCCCOORRE RUNDOCOCONDALeAODOMMNOMM 
ese serresrsrersrerT OOM AMNTANH Sera NAM TtOoOOOreWN OPMDDOMNY OSFDODPlOCTALRL UP DKOMNDKONDOKOMNDKOOUMONMANSFOAPOO DOCOCOFOKN OFtKOarstaroNnsrtoOwomnorOR Aw 
MOO DHONST ZURONDUNYOaAUHONSODNMOWAEOtwOo BEING GAHOFtOONS AOMOPOOUNSFODHMONSAOMOWDEHODOMUOSOe HONSTOODAURO NWO OW UNDO A NOHRINWOU 
MWD OOP EEE ODDONAANAAA teat ct tetneti MMM OUUU UU AAA OBB RAR mh ROD COPE TKRKKNNNANANNNMMNMMAMszASTSTATAMUMNNWM MWWWWOMONWUNr MH ODMONAADHN et eoret MMMM 
MAMAMOAMAMNMAMMMNAMNMAMAMMMAMNMMNNYAMMMMAMMMNAMMMNM AMAMMOAMNMNONMNMMNNMNAtArAstattsrsarstsastsassstssaststsssstssstsssst Ott sarsasasarssasassassssssasss 
MAMMMAMYAMAMMOAMAMMAMMA MMA MMAMMMAMMAMAMMMMMNMMHM MAMMAMNAMMNAMAMMAMMNMHAMMNMNMMMMNMMAMAMMMNMAMMMMNMMMNMMMAMNMMAMM MMMMMMMMMNM MMMAMMAMMMMMNMAMMAMMAMMMM™ 
DOOCSTSOSOPTOOOSOOSSTCOOSOSTOOCOSCSOCOCOCOCCOCOCOO DOO TODO SCOSTODDDOOSDOSCSOSODODDODOOCOCOVCOSCCODOODODOD DOOCOCDOCOCOO DBDOODODOOVOVOOCCCOCCoCO0oO 
DOODTOCOSCOSCOSSSCSOOSOSOCOSCOVOOSCOSOCOCOCOOOCOCCOO COSTS OSSOSOSCOSOOCSOODOSOSOSOSTOODODSOSSODODODSOODOSDOODSCODCSOODOCOOD CODOCOOCOO0SOSO OOoooco ooo ocoooooo00o 
Yn = 
et ic) 
H Er 
4 Be A 
© Me N 
aw a NN 
mM Are A = Dp (on AG a 
eH O J H AA Aa oOo A oO foe 
ee Ame nuns Hei H eH fF E+ oO 
<_ UO & YU o eM =z caso fea) UO = 3) A 9) 
me SHA © Or © Hei U AQ A ie) H Et fx 
non — qH mao Lam fy Fy A <>) YN mM Sp) a ie) (We 
of a) fiat O OO _ AH E41 E+ = mW A AG ca (o} 
=) AA & ica w 4 be ct AA ca 4 | ca) A oO = 4 KG fy jon] 
H2aAa WAH n tH HOU He < AON i=) 2 = zm eB e 2 a =] is) 
A AHO UA AnH Mm He SEO ZaeHu = oOo fF fF Oo |S) Aw © Oe N 
4 Be bd ct a Ohm Ha AR « YU A He a H Gi ta ca ca Tae) =A 
URMmMO 8 H a & HOBZM Be UBZAA nN Ch WN aA A OA MN © 22) T= <G A AH A = 
joa NHOH A ome BA URRHO OO HH 4 os) H ALUO HH AH = BH eH Me ds] Oh O & aa) oo <x 
o) me WEI « Bow ARM AR A YN AR «et AG AQ BH A ADA Dh ei a AU A BO HM BME © O AVCO =o) 
a ARPOH HAG Ome HAS mH mA SORH HO A UA USBI ABH Me &£& HAHA OG > ONURMEH 6) mhO Ol 
UO qa AS HOR Rau O AAHGA OORDMOzk fypg BWN aa ut fy a Zz = MG HH GM BNHU fe O FA ca 
ica] OHANDMNMAHAE MRwN SAH AQ OH BAO a ao = AH AHA H AE ME CSC OD BM MebDwR BA HH Bw we WO ONMm & 
—u x<m OW We  «< OmRNn > Mm USA Sh fy un mo U UOR UA = NO M OHOM fF U MHHAO MN n FW a oo 
+ Cc A HWORWN e HNN Ben AREORNH CO <= OA NAN HF. WNW CO O ARH O HU H OM e HN Feo (O PR MOO ca 
eH O HOH Meat BDH GB UDG DMONXHSSDHN BAO NN GB HH HR He HN a & MN oe) A GO UG HD BR BA Wha GH 0 EH mo a 
A> SG CHHRAW BOW O F NAHOUUDD=& AA OmmA Ori AS A HO OU = HB © =a AAR FARA AO A aeBoOUO At © MA HO 
«ce AY > MHOARAR POg MM NB DUANNOCO HMem MOUCO Mek A fy So @ FA Wem A H BEA NARH FPO A © Mean AAR &@ HAA MA I 
a N aAz ax ON moO jon Or — AAVULRAMAH fF GH GAH AMA HH AMA wm Mm MMH MQ Orie <> moO BOOnHO << iS at = > 
= eH OO GAA AY O Bema ORR & WOM AA HN — RIA mA UO WMA ca) a OO Ff COBH BA we MO & a YF A HH BA U 
=) Oo A A ean Rte Hab B RH (=) OURA UO A U A A Oo SS Ca He FF HI) HH MIA 2H << H ae eH 
Or +} GC PH eHow BUH HSNO NHN aHORHAe & Fl et NA Bae BO Oh UU OO Mae BHeHY BSH KB HHH Ge BY RNA YNSHe = 
<4 53 HOeMOomaho oO =AaFm 2RPOtORAAAAHHHODAH 2azOmOnM BAMORRe DOMBAM zazOmOMmMah = HODPRAAOmMeAy 2M wm BHMORD-HA om 2AM RAE ca 
1 OG MANO MNARH AR RSH tm aMNENNOOQNOANMst BABOUSGH BHOSNNHN UNH BeUSZNHO = HKABZHNANSSANEHXHH SHAAN RHEKHORB KHNAD Mere = 
NN 
=z N N srt ereer MN N N N z+ fon 
+ + = + + +++ +4 + xt + + ~ - 
Q m -—AAM =) AA AnAMaU mA wo A =) We) Q aA &- me NAM + + jaa) 
U UO +HHO am He OFsOOR OU rl KH = He a O H+ Or + OO 2a) ~Q ©) 
A aA AAA ANNA Aan mn ALAAN AA fH GH a eH ei A mn © AM AAA U O aA 
n H BHHONO mh rt Ge NANMHO Ne n ©) ms UO 29) nN PND MON OUmmo ma NA ma 
io H ANBSRKAzseNn Nt SSE MOG Oe 1S) n nN WN N U N = Seg RAS Amem + + = 
. UO Pm at#M «we & WOR WO om Gem & Be ee ee af & AO se On - mnmn~ eh 8 ot OR e ont On nL oP ee oS Om Beene ME mm Oe mt 
~ OY GENO See NGRe GR Be Oo Ww & DNNe & MH MRNA eo GAB eo DOAN » OMe. = NM GA NO e& MBO NEOGHe~ MAm Bee MM O MRR UO MOR] = 
So & eet eOO+ 8G eG 0G OW COM+ +f24>4 ot + BUR © Tm COC NWN+ © MU me © MU aa tM COU NM + BH eG ely OG DOr ANRGAR AMAR m eI 
o DGD AANAARCOCOMRARURARAOCNKrOCONAAOCOCAHUNRARAINORE MANOS MMMANONDQAARANORMASEARITNANCRAMMMAARBERARNMURAOAROCONM Rhy SHR MA, MINH ~ 
a3 OWOKRHOUU HRN URI RR SHS BTKON HIHOCHRPNOHA SOME 200 & 8UbOmM BIHAR Om SERIE SOO 8TH SHOR NMA SEA OH mOUOCRDHA MRD HRO sae 6) 
oo BOHPAZN HOOKS BNRIBDBANT ENOTES SPOOF SHOR SOGMMRtDOSSAOMOMAMARS MOMS BMRA EOtTTOZNISOANSMRAGBMONKRIPEHROAR MORI MaRotwmo = 
Cn id MUCH) Ge = NN“ Eee MN] & Mdiedte &§ BOM AaNe AGN] NEMNN.] NG GaN] AG SEAN Ne NNN SE EOE ~mbicdteg &§ MOOR NAR.- GEO ~ 
> e 402 1) OG tr DB Bd Dd cl SEF ctl PR a ad ett PT UD tk 0) 0 ec es ec Se dtd SG ett i ect cert etd 9 ect PD eG ct Bd pe ot OG 1 BH OAM MA RSH oy) 
Hi eH tH 
ei = oa ioe) Riri reir Ca Ry | ee BWM = 029) GR, BN ont Mh, He mR eS (ee) ioe) xz ON (ow) He 
H BRARABSRHHAN HSH HEOQKHRAHHHSSSSMO AMA BHR HSA WAH BHA Be RHO EA HS A HSB HAH BRS tH 
= QA> >>> PpOs>atOoUNOgROMO>rEMOMEM> Serre >> tUNOZSORUMOZFOMM> ZOMERMULMOZOMOBKUMO SFMOB>SMO>ESaUMO BUMOSOEE MS > aeUNOEP acUrmo = 
<< USS SSSmOZOQHOMAHAZOHMMOHE ES SEO S SMA HMMA HMBR HHS HMMA HH HOH MOO SHMOD SHAHN SSSA HOMMAHNSROSNSEMARMeSOASHam ©) 
\O ~ fo N N N © ne] 
oO o- d< Ps os - io) E> | (oe) Oo 
o = = = >< = ~ 2 © © 
i n n Nn n vn qi vn é ~ 
eHHH << =f << a << ei eG b He HH 


NOM DNHNOKNMANOEDHOTNMSNOEDHNOSCNAMANOEDNOK NM ANORDHNOKNAMANOEDHOKNAM SNORE DHNOKNAMSANOPDHAOK AMANO DHAOTKTNMANOEDHNOTAMSANOPODHOPNAMAMNOMO 
DDDDANANNANANANNSCOC0 OO 900 6 PEM HME ET NANNANNNANANNMMMOMMMNNMNMNSs Fatt FS ATTANMNNNN NN NNN OWOW OW OD OKCDOOEREREREERE DODDDODAODDDOAAAAAAACA 
SPSS SATA ST SAAS ST TAN NMOMN MN NWN NWN NWN WN MIAN WD LEA A A LA ED ED EAE ED EE EE 9 9 9 9 EE EE EE LU 8 LO E90 U9 LD EEL L999 EAL UD LOL BLO LD ELL LA LL LLIN LAL 
NNANNANNNNANNNANNNANNNANNNNNANNANNANNANNNNANNANNANNANNNANNNANNNNNANNANNANNANNNNNANNNANNNNNNNNNNNANANNNNNNNNNANNANANNANANNANN NAN ANNAN OANA ANNONA 


Oats ctoow <xao oo owosrsrr 


N io) © ae © - io) Land ica] a - 
H emsromoow fico oOo OOOCOm MU oO oS Oo © oO oO Oo z+ Ook MhRo© Ooo - Neo N 
WW HDWOWOOOW Mn0o Os ON wOTrOOCW!W wow oO a wm oO © io) Oo OOw woe \O F400 a) OrM oS 
N MANNONRION INN NO NMOON NN ioe) © mom © oO 1° @] io) N GON NNS NRO Mm om ©o 
O NORIO cg ectcHo Osx OOoc ag DMOORaHHO asrot ON AN 00 sO WS Oo «GOO «< FegaU Oder UROR kieO who O wa 
MW DOW WMW bys AN Ove fy Rik COWORCORMU one NR wn Wo On Ur n wh cai relts) = OLS) ad DEN CODD DAS AONS O Dk 
WO mQwooovwooor foptoe) NOW wo DHOOM ocr WOO mw oOo Ww om Wo ow oO wo WOW Wr\iownd OvOvVe DOOW]M Own OVWwowoemd WO oor 
N  ANNNANNAANN NN NMAN NN MAMNANAMANAN NNN CAN NON NN NN NN NON NAN NNANN NNN MANN ANN NANN NNN 


ANDDDOOQVUDAMYKOMUOKODUNV AYU CODDOODDMNDOQMNW KN QDOMNW KOM ANDAMNANAHAMO HO MONAHAN O LID AM VYVOCOCHKH DOOM MPONMNOK ADAUM EBDOMOKMOHOMOOKON 
NEINANANNNANNANOD BOON BONANONANIANNANANANAONNOD chee NOON CONONNNANENATINNOD BE NON NON AO ANNONANANDTNNANOD dOOOD AHNNANNNONNOD dONNOAN cEcOO 
DDO COCO COCOHNU EARN LOSCUCOCOUDDOOOMOCORINVOODOAINV COO YUDOOO VORIDVOODVOAINVU AOOUDOOCO UDOOCORIN YU AORINUNDSCOUOQWO ANNO SOOHINGS U ei 
OPDDDN St PANHNONTOONTFORN SPOS AAPOOSADODHON SRK POONFOPOESSON ATC STPONTEPOSAONTPOMN DS CASAACADSATPONATOOONSEAATOUMUSON SOS ATONT SO’ 


ND et OO UN ORI Ft BROND LU PND HDONDHOW UND RIND RINT OD RINWO A RItOO BOND ABUNUO MUNDO ORINAW ONS OOND GONODANATC ANS O0O0 RS thot thoONUUNUOHOt 
ROAMUVUUARA ABA Bibi HOC OTRECKNNNAMMM StS TNNMNNMNOODO OOK EEE ODDDONHAANN ett MO MMOMMOVUVUAA AAPA ye HOCOOCOT TK NANNMMMOM Ss Fa aW 
EE ANINNNNNNNNNNANANNNNNNNNANNNANNNNAANNNANNNANANANANANNANNANNANANNANANNANANANANANANANANANANMMMAMNMAMNMAMMMNMMMMAMMMAMMMMM 
NA™MMAMMMMAMAMMMNMMMMNMMMMMMMMMMMNMMMAMMNMNMNMAMMMMNMMMMNMNMMMAMAMMNMNMMMMNMMMNMAMMMAMMMMMAMANMAMMMNMAMMMMMMMAMMMMAMNMNMAMMMAMMMMAMMAM 
DODD ODOSOOOS CSO DOSSOSSCSOSSSSOSSSDSODDOSDOD DD OOSOSOSSSOSOOSSOSSSCSSOSSSSSSSSOSS SSS SSSSOSSSSSSOSOSOSSSSSSOSSSOOSSOSOEooeoooeo 
DODCO DODO OC ODDS SOOO CODD ADDOODOSDO CSCO DD OOD OOO DSCO SO SSCS SOOO DOS SSO SSSOSDOOOOSSSSDSSSOSSSSSOSSSSOSSHOSSSOSOSSSSSSOSSSSoOO 


4O2F 3462 0000 


003358 


PAGE 10A 
COPYRIGHT IBM CORP 1976 


6839424 EC=375222 


P/N= 


GENERAL UTILITY 


TIRES === 


10 


P AGE 
1976 


375222 


EC= 


6839424 


P/N= 


GENERAL UTILITY 


LIAFS === 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


COPYRIGHT IBM CORP 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


ie 
we 
oO 
Mm 
= 
Oo H 
O oO 
< 
Ar & 
Oo «a 
~ es 
ica} & Oo 
re oe) 
ale) Fea 
Od z 
NG a eH 
Ac O & 
moo HH A 
iS) =) 
a oa 
A = Oo OO 
Om =£ ei 
MR Oe A A 
wn moO =a & 
NO BR HH 
ee o w ow 
fzy 
fl © 
= is 5 
2) a an, 
b> 
a a O 
oc] ra] ‘“\ 
Oo ‘o) a 
6) O ~= 
<3] [<> 
o Bw VY 
4 
«< << 179) 
Be naBie Ne & 2 ome ad 
BODGOTUOON NR Orth oO 
AUMAUGMMOOK*e UNO &©§ © 
COA COA oCO!1! OCHA OO 
om OM OCOOk#* CRM OO 
ee en oe “es © eo WZ 8 ~e oe © & 
Ursa et OU eo et O Od 
VUYUOULVOOOVLOO YOLUULUYD 
AARARNRAARAAARA AAaAAgRAAA 
«G 
Oo OO Ne << 
CG mk mm mM H AH 
a AR AA A xe eH 
mm mm mm wa + CA 


cg 

* * 

* * 

* * 2] 

* * OQ 

* * ke 

* * = 

* *% Oo «« 

* eH © 

*% em A we 

* %* OU On A 

* e & op] SHO 

* * A Ww) Et 4 oe 

% ee] fx ie bb 

*% * fea] A Or 

* eH A 4 att 2 SE oe, 

* * O a MASE O 

* % of O21 KH «© 

* eH H © mBAUARA & 

* * BH HB HGH 94 OG eH 
* * HT BH MWY aHaOOOM 

* #0 ies) fui FQ BM OUR 

* % <oh RW eS Rt eS 9 

* #¥HAMN FM NP Ax nRmmhn 

* % Fu op) mr Co 

* %* %& ie mm MI Acteifuh, 

* Oo * HO 2 me © HMM, 

* SF #€#DwAzO OD fFumE+eirm Ore 
*% eB *8H © Ha OUAR Bb & 
% * & BB & WO ee A ARMAS 
*% SG *#*HNHe Bee NHAHcOmAGN 
* CO *£ RROD Dn RORAAMD ms 
* HASH ANH FHS GME 
* a * 

+ = * 

* Oo * 

* * 

% A 

+ ao 

+ Oo * 

* O * 

% FH #NwS wo 

* Ga #+4+ + N 

% %* Oe in g ee + 

% a e#UN Gf ae A mM ma 

* BH #ABS UO UF = VU UO 

* a *AKH A AM eH aA A 

* A *mDpD A AUS MP A A 

* * eH Mm MAR +H & fo] 

* H #N « e Oe Me a om hf 

% Nn #50 © &§ GM Ue eon Re 
* HY * oe © CO et& AO ONMUMOAR 
* HAH FRONDO RF kM AOMNARGerke 
* %F ZOMONOCDUOGMe RO « IO —G 
* He HOADCDANMARM wonosAANAE 
* %* De Ae Qe AA We Qe Ge ME 
% % Bb 05 PS AG OS PG Bt 5 DS Hk OE 
* & * 

=] * 

%¥HH m— Fey HN ik WM Hie 
*e +t FORA SQM AMHR Bes 
DD © *# PROBS PPrmreztozuOcurao 
*¥*O ~~ *# SHSM AOHVBTEBNSHHVOHMAZBHO 
% * 

%M t= N a) 

> % Fy RN fe 

*W ea AA A 

* *aA AA A 
HHHEHRKG eet ea jaw) 


fp) 
* * — 
* ee * ee 
* ids] * at 
= * = * a] 
(@) * KH * nh 
ei *% | * ' 
GH * | * Wn) 
-< % —< * O 
1S) * UO * m 
eH * * 1@) A 
A * ° % aA =z 
z= & * «G 
{re Hn * * a 
(o)  * fom * «<t Aa isa) 
oE Ha * OQ * fa ee] 5) 
HunN UA * 4 * Ww (oa ‘e) A 
mn wn HA * fea] * Ww Aa iS) 
CO fF A re ae * WS = & [oe] i) isa) 
m mm & * aA * moO et (@) oe) 59] 
no A A Am * ) ov | * A om eH &f ~~ Oo wo wa ( mw e 
nO A A se 4?) tH + AR HHAO ZAZA =a [o<] a A Se Beh . 
AA «= <emHWO +* a HU * Qe ABH BHR DHDH oO & © Oo = O Rikon 
aay sa) FSHNUe few AN * RQ HR mm YU O Oa oa} [oo] a oO = MMwA A 
a Gm MAPHhAAs oO n~- * = mn foe} c3) UOURUA am A [a=] a OY mG < O 
Ac F Heo OH 1) * oh MRHAON oO = & YQ Fl WRID oO te 
<H A AMO * fa He * 5M ARH NNR Ref (@) wn nn G 
<c a@ «tm & Hie fea] am * & mnNnN Of HORE BH OU ee =a) et Oo A Cc 
AAR A A AaANS ic) * FE fey a DS mE >t, a oF) Oo AO Rime a eH 
e Tm DHHOAOrs A <b 2) * @O BA Bane Mmm D> WN fn) D> => fea fey oO O 
ee ma oe ca Te =) * i mm oo =) fon [ae] ao & = OO=z VU fa 
HU F&F HHHHE * Hie mw * A Be Ue QBAaamRmMm waRMam mo mes faa) uw) 
AHO AMhAhoO*r eof b ay on %* PH 22Z2Pw PrP HOR BHO ADH AACH BZD fA 
NAA NMNMNWNOOFe WORM cae * HN ABH Meee AHHH MAHA ee Net BHN ee Nee S e 
* 2=OH Ww) * WHORA PPAHA BRERA 2A SARS pa A ca 
* HRA omm FF NASZNHN HHNKEeNNNVN SHAH SEDAHS GAAS OMA HH NEKO 
* SAH mwuU * 
+ Onm aE 6G * 
* ae Ss Aa * 
* => [awh 7] <3] * 
* OHA man * 
* RHO me * 
% oot @) LAX me We) N NON - 
* casa t @) OAH NN * + + erNe +> 
* MPH Kl + * eH fea) +++ U 
* Ne  ) Se a Om mmo mmm mm 4 
* a mz0O fF = UO ULA UOU OU 79) 
N * A SHQ He wm * H AAR AAR ARA AA ido) 
+ * << Mihi ma St € NDP GBA BRAzrO MBAA N N GA — 
na] * BM om OM RF * +H SS BO eG +S + + oe OG ~~ & 
Po aw") + (od She 0c R Ee ep i en 2 2 or 2° 2 Co QD ma ~ OQ om -o mM WM 
Qe ~ Ma = ram | * We “oe ee ¢€™%M Use Ne GOR, UOKHS Ra UO Ro ce e& mA me} 
ws) & & Mea > Fler KO » *+ GE CO TOR+ AOFO WRG ARMMMm OMMm AOCmMMm oOo Seat =] 
mMOar WN © COMMA RB MeN UOim MQM & BOATOCOMNNTAOD MOMOR Mee wer eer Am aAeNe Zhing Ay 
DD eam & wos | =m * ROADDNRVCOSZVVUSZETOUCDAR MBH A of OG GH COCO BHD ea 
MarAmMaAaGh atrtMwx ee) ] feagca} * MOMOOCMONHAGRM MCAOCMMRTR VWRATMARITE MORAMONHe ONNMH 
ARMAARAADNGmAAS <a jams Fre 2 + * We Gee Gow DM We Me SFIE“~MANSBHVeme~GAaAnNm~MGe ew | Hm mD> 
a cada i a Bee > OH HAG DSIRE bd Dd FE od Bd Es Em EMH EEN Ee ORE HE 
% » WY ie] = * 
*=2= FO nN mam 
Pa fey HM %#H & A > * fu HH N eH [ee [oa] joa) SG Ae Ha 
GEthy<et Orbit £EY HH & is) HH + BAH SEOONnOseasAea HSA AeA HARA HAS eG hm 
-MOTr PrPrPOr> #> mw Dp = QQ + PEOFTE Perr srr rreteUNMNOFSCUMAGHRUNMOFAUNOYS> PrP >> 
i a aa ao te Ay Ke = * BHMOOMHBDABZDBNBABAMOQNQAAHAaAMAAHPMAHHAKMNAHHREEMN BETE= 
* J * 
arw * =) * + WwW HH = 
Fa Fe *> «G * QA A A YH A 
AA *WN UO xe G a 
AA % %# & ae = 
mr HHHHHHKHKHHKHHHKKEHHKE = = Re = 


MONDO MNAM SNOOP DNOCNAMHMPNGEDHNOTNAM SNOOP DHOSCAM ANUP DONDE NMSTNOEDAOTAM ASANO DNHNOSCAMSNOPDOHOSCAMANOPODHOLCANMANOPDNOKAMNANOMDHAOKTANMAMNOEr ONS 
ANNAMMNMMNMMNMNMNN Nts st ttATAPATTIMMMNMNMUMIMNM WNW OO OW WOO DUP ERE EEEPPEE FE ODDDDODODDDDNANNNANAAHAHNS CO COC OC CC0 © SSCP SPE CONANNANNANANANAMMMMMAMMMMMs 
DODD DODMODDODDDNDDDODDDODODDDDDODDDDOD DDO WDD DDDDDD DOO DODO DODD ODO DDDDDDDD DOD DD DDD DOO DDONAANAAHAAAAAANAAAAAAAAAAAAAAADAANAAAAAAAAHAHAAAH 
NANANNANNNNANNNNANNANNANNANNNANNANNNNNANNANNANNNANANNANNANANANNANNNANNNANNANANAANANNANNNANANNANANANANANANNNANNANANANANANNNANANANNNNANANNANANNNNNANNNANANANANNANNNNANNAANNANNO 


1®) i®) a = 2 
(on) Hn ~ (a) 
a A UO =z 
© © uw) © 
kg io 9 1S) Pg 
- - N o 
iS) i) ic] = 
” (vr) o © 
fr fa Oo > 
= o ~ © 
1S) YO 1S) =o 
> => Oo jo) 
1) U U => 
DOODDTODOONODO OCDORO © 
TSOMNAVUVOSTOCOO Umotr © 
COOWDTOWOOCOCOSO OCWORKOCO 
TOMAPOMsoooo omer astoo 
ORMOMODEURICO NroOmomuU 
Nett MQOUURIRER Rim mRNN 
WWWMWOUWMOMOWUOUWWO WNOwmuorr 
MNOAMMMAMMMMAMM MMAMMMNM 
MOOOTCTOCOOCOOO DOCOCOCOO 
COoooococoooo00o0 o000OSO 
nN 
a 
= 
Fy 
© 
eH 
mM A 
Sq 
A mS 
be EX 
oO bs nm 
a oO & = (7) 
isa) fr iS Aa 
= He 
RQ am © UA 
<< AQ BOmmwaa 
22) (=) URON& 
<= HAN so) 
RA yH DBM 
Or ae mae non 
Fu Be AWS ee 
ic] 4 om ™ 
Rah CmnFtm mM 
AN Oa mhWO 
A OAM HOA 
eaQ Oe rH z= 
eH et HH Ha NH faa] 
<< cat og oy an] Oh 2 + > 
RH PHU He =a) 
cm Het sOnOcakn <3) 
AS AAHMHAZRUAS [oa] 
a 
=r i 9 + 
= - [20 2 
+ + NO @&- 
ea) mo +O + 
1) oO man wa 
A A Us YU 
80 om no As ANH 
SOA OE Ws NORE 
ee A Ae SB eG 
REM RAR 4 ee OG 400 
ARR smctOMeZOUOOCRA ww 
AMRaSFARmNANROONNMRHIaS 
CS at eM OAE~mhMN 
QA CHINE NN AHHH 
aw) [aw 
SoH ASABE ee ces HS 
FPaUNOSS Se > fF etOMO 
BaQOHMk Seen SemaHaF 
o 
8G 
nN 
= 
<<c 


26AC 0800 


0100 
26AE 0020 


27F0 


Fu 
<q 
woo 
N= 


i) 
m 
ioe) 
m 


26AC 2010 


3B14 


jc] 
ce 
oO 
ae] 


\o 
op) 
\O 
ine] 


io) 
N 
© 
io) 


36AE 


DAFNMOOM LO M+stUMMNVOSCKOOMMANTOAMNIN 
NNODNONNANODNNONNONNGONNONONONNNG 
DCDOOCOOTOCOCUOHNDOSOUANNOV GOVE oF OOUMD 
ADArAMstTPOMNVAPOEASTONSTT Ot Sper IAwMsTOstsaTN 


Ror tN hOtO tOND eg ROUDUNTO COONUDYU 
AMM ts SAMMI NOCOWDO CREE EE ODDDANAHAAGO 
PERE EEE EP er ePnrhrnPrnrnrnrerennrnrt 
AMNMAMAMNAMMAMAMNMAMMAMMAMMMAMMAMMMMAMNMAMMNM 
CDOOTOSCOSCOSCOSOSSOSSOSCOCOSOOSCOOOOCOCCOo 
DOOCOCOOSCOOCSOSOSOSOODSOSDOOOSOSOOOOEoOO 


FAILING SECTOR ID 


SAVE SECTOR # 
PHY SCT# OF SKEWED ID 
BUFFER ADDR OF 


CONSTANT 


OUTPUT MESSAGE TO USER 


ERROR IN WRITING SECTOR ID 


MESSE,R7 
END 


MVA 
J 


SG 
n 


oO 
oH 


fa 
[an 
«G 
= 
4 
a 
Ce 
4 
ca oa) 
wl | 
(28) < 
KG 
iow c4 
ica] = 
> <a 
(o) = 
UO = 
ca) 14s] 
oa) me 
a YQ 
=D ep) 
<a 
< 
& eH 
< — 
AX at 
™ 
~ OG 
[aay - 
» i 
WN Ww 
YA NA 
Aa Wea 
=F = 
C+ << 
> ad 
=a) <r 
- ae] 
= = 
= = 
Nn nN 
a + 


INVALID FLAG BYTE 


kl 


MESS6 
END 


J 
M5 MVA 


SMM4 MVA 


HG 


BAD SECTOR ID 


EXIT 


eR7 


MESS8 


M 
D 


N= 
*¥ckl 


REWRITE! 


v 


ENVALID FLAG BYTE SPECIFIED FOR SKEWED ID! 


ASSIGNED OK, DATA CRC DETECTED! 
ESS9) 


s5 
SEtTOR ALREADY ASSIGNED! 


SS7 


we 
S1 
5 ERROR IN WRITING SECTOR ID' 


4 SECTOR ID UNREADABLE 


ESSF 


on » M e - - ~ 
ORTMOMRNOMMNS So © 
ORROLDHODTKOLROEHO 


eo “eae o “ae ve “eae oc “ea «@ a @ 


PSG PKG OS EU SEO PSO OS 


OVVVOVOVUOVVVVDOLUDYU 

AAAARARAAAAAARARAAA 
ew rN OTF OO Fi, 
mm WM MW NN MN 
Mmm MM NM NM WMH 
AH Fe Ae Ae Aw} 
s= fe SE SS B= 


“- CO rom ORO (ay) Oo ~O 
Oo CO Nem Odo N N Ne fu 
Oo DM DOW —mOe Oo Oo CoO Wo) 
Oo CO ONN ONO oO >) ON N 
BA YO YOUsk mORODYU <3t®) o oO UUO Us m9 
Nt Oc OetD DHOMASO Oo fu ee Fey Odo a- st 
OD WO WOWOMO WOWWWOD Nelee) ~~ wor wWwwWOo WO Oo 
Me AN ANEN ANNNMN ANN N ANN NNO NM - 
ARM UUWCOCOMN dDODOMMNVKANMOKMMNOKONMOKDOON tztOrO 
DNONANDNAANNONNNNDOD ae NOM 2LroON aerNONnaoONnNno ANQK~ aN 
HOODOO ODOCOMOWUWDOCORRINUNOHINUNRIDNUNOEIDNUNGDOOD MMNmMOo 
OPM SPAHDOMNOUADPOONDTEAONTCTONSZETONSeEsSTSTO +tTONA 
COtAMUND OW VONWOUNDUONSFWOVONTOGUNOWMUMOWOL OFODKU 
“ene MOQMQIUUVUAARARA RR my hRODOOCDOOOCTRTRPEKANN MMMMM 
PEPPER PO nemeeeeereeeerer er ODNDODDDDDDDDDDMDMODMD DODD 
MAMA MMAMAMMMNMNMNAMNMNMNMMNNMAMNMNMNMNAMMMNAMNMMNMMMMAMMAM MMAMNM 
DODDTOOCODDTOCDODOCOOCOCOCOCOCOCOCODVOCOOCCOCOOCOSCOSO CCOCCOO 
DOODODDOCDDODOCCCDODOCOOCOOCOOCOCOCOOCOCOCOOCCOCCO COO0OCoCO 
A 

* + Fa 

+ + = 

* * is) 

* * a 

% * ap) 

* * 

* + z= i) a 

* * ea) e<) AG 

* * =a) A a fx 

+ + eH > J > 

* * HH wmnn me & wn 6 = uN 

* + a OM eH © isp) - © op) 

* + = WAY ep) fr) ica Td) xy UO FAN 

* * oO Ww) muy muy 

+ * Oo nm AAN Ff muno A m no Ar 

* * mn H AAWN & Bue Am B OH Arm 

% * FA aah A NNR MN mA = MW aA 

% #UINE Q ~ AA MmMNN a Rau) a 

+ #W) H BEA @ HzZAAnR fe = AAM Hea 

% % RIK aR A HAMM O Co fe Amma oO 

+ * GOR & OO N & Z&ONR MO < LOA MO 

% #A A Hunn On fA kRH eB WM ZQ fie 

* # AGH mam me xt x MM eH «dt 

* # DOH HROOM fT HmMDR, HH W aA a Dru Be Mm 

* * Be ZMUUA A 2@zxthnoe zm 4G << AoOot @2=z= A 

+ *# AUD Ha CHE HDHAE Mm AR eH Oo A H & AR ee 

* HMRIE Of BOM HYHAHOMDme SE = Dae SE 

* + HW) GS meeoom mw UYU OFGM Wm AH al ORM WAR & 

* * A oO FF Bb H A Mm moe We A oa) AG Qu, 

* HHH OG HHH HNHNae eee UO CONN Bee OOOH & 

* +R BORAAAAHRAHHORDA wmaOm OHO MOA 2wzmOmMm H 

+ HNN MMANNNNWANANANSZN BHA AAR KEKE NEN BAA = 

* * 

*% * 

+ * 

* % 

% * 

* cd 

+ * 

* * o 

+ YN * 

* Q * 

* RH ean wn 

+ e+ + co Qa 

* wm #MA m aa} 

* = «8 OO + J = 

* UO * AA rei+ + 

* ag * ES N rhe w Na) fon 

* RQ % Re +> on a [e*) ro} (o) 

+ HH + & wow Oh fy (Q -~ Oe aN fea} re BH 

* eat GRR GAM ~~ =e Nemes eM OFM af Naso eo Ue — 

+ BH ££ +0 8m wom Mm ON ~ +4 we WM Ne N ™ ++ & & oOmMRowo 

* MW # MODAN « wt « ~ OF & GM MMNG BMH +r5e Ge BG Meee OS URNNUG 

% H #UOHA MAQCOMER N MWA HARD DD OVOM™Hr HAAN 2 CA OA 

* AH FAC ORAHROO WH WH mMOMMOHHRODTONS & A OMOMMWOHRHO Ot Ot 

* % Me BM™MWMANRAMADADOHH wee © Mtb OQMAHe MNH Ae 8© ee ew ew 

% % UNS EH HM TOMO yest MOMNH HOO ~HE RK MRNMINNHOOR MO bce 

=] + 

+ ei * 

* GH eo fonds H a H a Mei a 

> = HSE Ae Ae UE OU HHH OUR HS RMSE SRAOCQOURHWA CO 

HO MM £PP CUNO RPP PPP PP PP PP rPrEZUPPONMOP>P PhP rp Pr SEU> > UUUUYO 

¥E © *# SVOOQHHVOBBVVBNSUNSVBBBN A eH SNYSPHOLEBSYSSeencesyenag Anaaa 

REQ = € 

#2 t— N Ha WM Ke) ~~ 

#W #2 a nN oO fen) ron) -—m Ww 

+ % iH HK wo wo Vo) \o ma 

+ #A Aa BA A Q A BA A 

HHH HHH OG foe) Be & i] He mm iw 


NANNANNNANNANNANNANNANNNANNNANNANNANNNNANNANANANNANNANNNNNNNNNNNNNNANNANANNANAANNNANNNANNNNNANANNNANNNNNNNANNANNNANNNANANNNANNNNNNANNNNNNNNANNNNN ANNAN 


< teeter go s+ 
UO onorm Oo 
\o Cwocwowo fk 
N ONONN ™ 
OO WOUKRKEO OU \o 
o~r HAOoeeor o- ion 
too AUNINMNWO woo ion) 
TAN NMAMAMN AN N 


ADMVUOKHONDHADDOOMIEKOY 
NON EONNNANAN ANON atOO 
DAN LODSDDOOHHAL co 
DONTOASPOATDOMAFONTOW 


CU AUNNORS cONDUROsS 
VUDUUVOU AAA Rik RoOOS 
on mm a ms me ne ee em me em OL) 
MAMMAMMMMMAMMAMNMAMMMMNM 
OOoocoococoocooo0e00oo 
COoceooooooo°coscooo 


oroo 
oooco 
oo°o°o 
oooeo 


wWOdDeO 
oooo 
LALNLAL 
MOM 
oooeo 
ooo°e 


A a O A =r 
~ \O rm \o rep) 
U A A a a 
Ov ~m ~ m \o 
U ee UO oe aA 
N m wo ~- a 
ce UO 4 1S) i=) 
N we Ww Ww) OV 
i O aA o) A 
N o2) N wo 
O ee oO ca UO 
© o>) o o oO 
9 = = — 2 = 
Orr BN OM WOst ain 
Omm Wh, Mh chy Ofy 


CWINMOMMoMMonmonme 
OMPOMPROoOMEromMmromre 


ONAMNOONSONS OWS aim 
MMMDLALNIMS Ie tet et OO OF 
LOLA LAA LALA LALLA LAL LNA LI LN) 
MAMAMMMMAMMMMMMmMamM 
SOOOOCOOCCooCoeoo0o0oo 
OOooooccecoo000ocoo0 


oo x le NO << NO 
ole) - om Pu oo Pry oo 
woe ice hm oo Xo oo 
NO 8] mm oo ~m oo 
Omv0 ANRSTeEN Oo COMO UO HO F Oo Aa CoC UO RO =F ®D 
~aa RIeNO O whik fH We Co OC & RM Wm fm & 
wovorm MOmMOO O COMODO © OO 0 ~ oOo wo oO wow oO DOD 
NNN NAMoOmM mM om™m mM mm ™M mOonmnmn mm™m ~aN 


DOMVENMOFtAtSPOFSOAOOASA EHAHVTFONMEF SOPVUOANST BAHOATON 
NNODNAOONNNANONOANNODNENN NG BDNENSNENONE NAN RNOCO 
DONHNVS ROMNSROPCCOODP COOOL COUNM a LON OCOCOYOf 
OPONSroOsttattOTPOAHNTPOtA OAS OPONSEIPOIFNTAIOF OAT MNIwoo 


ONMAOMORNDVUOAOAUOCWOUNNS cONUO ZOUNRNADKONWOONMSO ev 
Fd Fe Fy Fe Fs OOO PCCP EKETNANNNANMNM NM St Sse TTTNMMNC OOOO EEE 
LOLA LO LALIT LA LOW DO LO LOO LOW LO OWL LO WOU LOW WOW HOW WOW WO OWOU OWOWO 
MMMM MM MMAMNMMNMNMMNAMNMMNMMNMAMNMNAAMNMMMAMMNNMANMNMNANIMAMMAMAMM 
DODSTOSCOSOOSOSSSSSSSSSCOSCOSSSOSSSCSOSSCSOOCSCODOCOOeCoeo0ooo 
PSODOOSTOTODOCOSO SCS SSOSSOSOOSSSOOSOSOSSOOSOSOOSOSOOOOCOCOSoSOo 


E2C5C3E3D6D94 


orooe 
Yoruo 
Owoceow 
omstom 


ONAMSO 
DMDaondonn 
Wiowmnwnvw 
MMMAMH) 
oooeo 
ooo°eo 





























PAGE 11A 
COPYRIGHT IBM CORP 1976 


375222 


EC= 


6839424 


P/N= 


GENERAL UTILITY 


LIAS S32 


PAGE 11 
COPYRIGHT IBM CORP 1976 


375222 


EC= 


6839424 


P/N= 


GENERAL UTILITY 


LIAFQ === 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


STMT SOURCE STATEMENT 


OBJECT TEXT 


LOCTR 


A 
a] 
ca] 
foe) 
Ww 
jo) 
roa) 
© 
© 
© 
© 
i) 
© 
NY 
Oo p 
me & 
«tl 
Ey €E4 
mn WwW 
xc YN 
F HA OO 
EH o A 
ie) = 
isa] MO 
YQ AN 
Be mM 
~ tf ~ YO 
a2) Am A 
Au aA ma Q 
=z aA no wv = 
© He O « Ct on a = 
aa + 0+ thth = = zm re 
= B Hea BA H oO 2B Ha 
ids) Oo OO VON ™ em 0 = O OM 
ie) era FAH WwW HO & © Ae aA 
J eKHwD © NNA Ge © oO NR & 
28) Ora << Ot H « = 
BO A BRgq FA mee OC eee He wf he 
mA Se mem & MMO nH Mm & DMO & WMO t& 
fq MN A,Au HAO © (@) Ay nN 
=A (a) Mm AY = fF He OQ Ay pa 
eG Cc AHNMNHN UOM eB HH NHN N Onwmn Os H 
ole) A 2GHAHOszazD A ZO Ff OnAH 2D & 
Urit GB CGHOAKnOASAHH FR BGK OKKEHKEAAHMA RR N 
Mmm st 
++ +55 
mnNarnen (=) Oo (=) A 
VUUL+t0++4+ 1 H a 4 
PAMAMNM —H aH WwW a & 
MWmoOMOD is) Hw & 1S) O 
MGAMAA WN ANN Or = om nn <p) 
™ © eo) MMe ~ - Fee ON Se arma »_ +n » 
Germs DO -e@ Moo BaRH. ARAM GW WO @ MO -« 
et + 8+ See st OO UUSt ~AG AG ater “ +t © Us O 
HOUR MAO OA MAAR MOMAAMNRK Rae mim sat SMMmOMmMAMRIONR 
PES OHHHE sha SOCOM SER ee DM BOM BOG 
BM AHQOHHORANAHOMMABISMOMRAeMMMy anmstRORATNOR 
OCOMMaANVUUR~HAMRe © WHOA MO Mm MRe MH wMHe GF 
UO Oy 05 0g 010 02 84 ed HH Bt He ASE OER ER 
Om «6G Ry iép) 0G Ry Ha & M© 
AMMEe ected HEARS HRHHe 4 HRA HSA HR OY 
are >>> r>emOMOMOBOSEM aUNOrrrr>rPre MOTFOzZM & 
QESSBBSEDAMOOHMHMHMaA HMA PSESSSSSNHyeyehHMOF 
- ica foe e ion 
wat < [e< few ee 
MN Y ica) 24] 6 
B ei ed 3 es 
BH i # #8 8 


+ * 
* * 
* * 
% Bd 
* * 
* * 
* % 
% * 
% % 
* ~ * 
* Oo * fee] 
* + * ican] =) 
* * ep) > 
* be * > oO 
* Ay *% EH 
* = * = Z 
* 4 * io) HH 
* > * [ae] = 4 
ry qe * fy Dm A 
% _ % Ha oO 
+ * = NA UO Rim 
+ OG * [aa] Ha OR 
* Fe * ea) Nee HF fiw 
* n + & H -— 
* fos) * GH Seo FH eet 
- * * < FAA mo 
~ * = * Qy Fy fy Fa Fa 
@) * © * RRR EO 
o % rae} * 4 mpm Bie 
(=) * fey * & MOPAR « 
[ecten) * * cm Ose wn 
(@) % SG Oo * (=) fm Gj 
4 Ay * RY & * HH <> 
UE % fy . + = MHRHO BE: 
cae % fey By * BS Ream «thy 
Nh * 5m p * OH SSEHO FG 
* ao m + 
% = * 
* A * 
* H % 
+ kei * 
* RG * 
+ = pw % - 
* (a4 * + 
% a m * << <G 
* N =m HAHN 
+ ei ] O * kG Ky +} 
* i) om AAG + 
* < k “ * Seem a aa) 
% HH Y * we em N > 
% HH & * W”A ANG ica] 
2 * H FN * ++ re Om A 
COON * 2 D «Ss * BH wo es » 
oom +* H Oo MQ # ASO RS 
COON #* FB is} + Ba2HRrDOHe Be 
ooo *# = i] 7p) * MERA eOmMe wNo 
oe © * kK { * mmPae MAaAtrMNAGg 
ott oS > 2) %* HEM SEE( Sz 
* 2 WN BB * 
* oOo O HS & 
* mM & A OP eH 
> + MOM G&G wp HH *€F PAMZESERAWHNEN 
UUO *# Dp DP eH #F OPP PPP BAH xX 
AA #£+# Nm U BG * HBVSTVSSVA ITN 
* * 
oc A * % Ry 
OmH * * Dp 
UUDP * @ N 
HAA + * & fea) 
KUMIMOKRKRKEHHKRHEHEHHKHKEHM = 


SAVE ID OF SCT TO BE MOVED 
SAVE ID OF SCT OF AVAIL ID 


DEFECTIVE ID 
ALTERNATE ID 


PATCH 


eewevwrFeewewnweFwrTe Fens BwewFeewreeweewewewnrwereeewere#eee fe = 
Oooooocoooooeoocoooooooo0ooooooCooCoooooo 
mremmmm DODO OOCOOCOCSECoCoooooooooocooocmcCc—momo~ ooo 
t ] 1 pOOooooocoooocoCooCcoooooCOoOCoeOoOCoCOoOooOOoOOoOoo ¥ 
* + as * eFOOCOOCOOoOooOoCoOooOoOoCooCooCooCOooooocooocoo | 
Oooo catia eteooooqoocococecooocoooooooococoo0ocoooo0oo w= 
—e MWODDDMAOOOCOCOCCOoCocoCoOoooocoocooCoOCOCOCoCCOoOCOCOoOOoCOoOKSe 
HeelaiNNNNNNs © ew we we we ww ww www we em we we wm ee we em we we we OC we ee ew ewe Oo 
NONI DR 0 OO Om BS PS OS PS PS GS OS PS OS PS OS PG PG PS OS PS PS Pt Bt DG PG dl Bt Bg PG PS OS PS PG DS ON FE, 


YUOUQVU0OUL0UYU 
AARARAAARBARVVUVUDUDUVUDUUULDUUUUULOUULUUUDULULUUYUOU0DN 
AARANnRAARARAAAANRAAAAAAARAARARBEKAARaARARAAAARAA 
Act ee & NM 
AG Er Bey Fey es Fey ey = 
BEARD DDD DDOSCNMANOPODN SE OOARHOENMANOPOAMMOYARROU 
HAS AOMMMNMDMNOO OO 00000000 0008 2 PPC OOM CHOCO OC eO EK NH 
ULerP mmaAnnaAAnnAnARARaAANnRARAANRRARAANANAARARAARAARAARARAAANAAA 


HNN ESA M RH HAH HH HH eH HH HA RR HH 


FNAMATNHNOKODHOTNMAPMNOPDHOCNMASANOMDHOSCAMANOPDHOCNAMTOPDHNOSCAMANOPDHNOTNAMANOLDHDONMANOSDHASCSENMANOPOHOENAMAMNOPDHOEKPNAMANOEPDACHENMaNO 
SSS SATATSTAMNNMNNOMNIMNMMN MN OOOO DO O00 EEE EE EE EE DOD DODDDDODDDAANANAAHAAHAANS OH OOOO OOOO Cl 6 STL EANANNNANNAANANMMAMMMNAMMO OO st a Pa PSSST TMMNMWWMW 
DAADAADAAAAAAAHAAAAANAADAAAADD AAAAAHAAAAAAAAAAADAAAHAARAAANAAANRAHAAHANHAANSSSOOSCSCOSOSSSSSSSOSSOSSOSSOSOSOOOOSOOSOOOSOSOOCOCOOCCOCOCOOOSSCSooo 
NANANNNANNANNANANNANANANNANANAAANNANNAANANANNNNNNANANNANNNNNNNNNNAN ANNAN NNANNNN NAAN MOMAMMMAMAMMNMAMAMMMYAMAMMMMAMMMAMMMHAMAMMHAMMMM HAMM MHMMHAMMMAMMMMMMNM Mm 


hHROONN oO Er UO o ~- © 
MUO ARR Oo Ooo Ar o © © 
WiMOWOwlMnwn oOo oo Felts) oOo © © 
NNNANANANAN o oo NN o © © 
BOO © «gq eC N WA + TFOKN \O N N 
© a myWWOWOD AY A WU - mm RN °2) 4 oO cm 
mwowosrowowor WM Wr ioe) NAAN OY io) mW wo ite) 
NNANNANMANAN NNN N MOANMH N NON N 


NDDODODSOMVOK MOT DARNNSTAMNOK DOODFIANANOHAANAHONOM 
OGNAANNNNGD GONE NONNNDONKONNANNSOODNONONNANA 
HOD DDOOAINROINUNG OOO VO AHNVGSOMNHADUNSGOOUSOO 
WOnnneortroNFterstrsrststsMNoNtSeNOtrzTONVOtearrsaswMsIwM 


NOUN OMS AMON STOUDNOCWOUDOTOD MOV AHIONUWUDAONDAON 
TaFTMMNMOOOPKLEEKLODDDDHAVAGAHAO acaetacmMmMmMmmMAmMovUOVUVA 
DODDDODDDDDDDADDDADDDDDDDDDDODDDDDDDDODODO 
AMMA MAM MMNAMMNMMAMMHMNMMNAMNMMNHMNMAMNNAMNMMNMNMNMMAMMMAMMMMM 
CODOOCSTCOSCSOSSCTOOCSOSCOCOSTOSCODOCSOCSOOCOCSCOCSCSCOCOCOOO 
CODTOCODODOVDOOCODCDD OCOD DCDCODOOCCOCCCCOCOCCOSCOO 


BRNOSNO 
TTHOrk A 
NOW O00 fy 
ee NOMNR 


26F2 25E6 


onorstase-MNoOoO 
ANNAN <g EI RANG 
COOrNOhMODW 
ODOArAOM OM 


COO Rt HNO AON 
RAAR RA himmaRS 
DMODDMADADAADO 
MMAMMAMMMMaAM Mm 
wll elelelelelelol ela) 
oDoooo0o0o0o0ooo 


ooooece 
wlolololeole) 
oooeoc]eKe 
elolelelele) 
oCOooece 
oooeoecoco 
wlojlelololo) 
ooo°oeeo 
wlololelole) 
DOOD SCOSSOSOSOSOSOSOSOCOOCSOSOOSOCCOCSOSSOOCOSCOOSOOCOOOoO 


000000000 


DOOCSTOOOSSTOOSSSSSSSSSSSSSSSOCOCSOSSOSCOSCOCOOOOoeoe 
DOOCTCOOSOSTDOOOSCSOSCOODOOSSDSOSCSSSOOSSSOOSSOOCOOOoCoeeooe 


TOVECSAAPASAATVUVOAMVVSAODVSADWDVGSADWVSADWDVOADVGCFWDVOAWO 
OOO CoC CMS FHKE NNNNMM MM SF FATAMOMWMINOWOWOCE EES DODDADAAAHY 
OVOVON ON OY 20) 9 OU) a FD Fe Fg Pg Fig Fg Fg Fe Py Fg Pg Ft Fg Re Fg Fy Pg Fog Fa Fy fy cy Fey Fey fitey fing Fs fy Fity Pay fy Pra Pry Pg Fs Pry 
MMA MNMAMM MMMNAMNMNAMNM MN MAM MAMMA HAMMAM MAMMA MMA MMM MMMM MAMMA MH 
COOCDOOCOCODOOOCTOOCOCCOCOCCCCCoCCOCSceooooooooocmcCceoe ooo mo 
SocTcocococoooecooeoocoooooo0o0o0o0cocooocooooocoocooooocoooccon 


LAPS ==> 


DECLARED 
2978 
2964 
1800 
1869 

924 
1842 


2971 
518 
483 
484 
468 
902 
888 
895 
909 
915 
882 
482 

2998 
918 

2934 
91:2 
a2 
102 
103 

4 
43 
46 
38 
40 
45 

2093 

2724 

2389 

2361 

2368 

2375 

2373 

2386 

2388 

29.42 

2743 

2746 

2749 

2752 

2250 

2270 

2263 

2256 

2706 

2296 

2309 


GENERAL UTILITY 


NAME 
SS$S$RR 
SSERR 
SCONC 
$C ONX 
$SDIAG 
SERR$S 


SERR1 
SINTL 
$IOIN 
SISB 
$LE 
SRD 
SRDID 
SRDIM 
SRDVY 
SRKEW 
SSEEK 
$TUID 
SWBUF 
SWKEW 
SWRET 
SWRT 
$WSEC 
@DCADD1 
@DCADD2 
@GOTO 
@INPT 
@NVLD 
@QUES 
@STOP 
@TUXX 
AMSK 
AMSK1 
ASMDD 
ASMD1 
ASMD2 
ASMD3 
ASMD4 
ASMD5 
ASMD9 
ASME3 
ASMMN1 
ASMM3 
ASMM4 
ASMM5 
ASMRD 
ASMRX 
ASMR1 
ASMR2 
ASMSK 
ASMWR 
ASMWX 
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CSECT (I7AF9 


CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT(I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
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EC=375222 
COPYRIGHT IBM CORP 1976 
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LENGTH (2) 
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LENGTH (4) 
LENGTH (4) 
LENGTH (4) 
LENGTH (6) 
LENGTH (6) 
LENGTH (6) 
LENGTH (4) 
LENGTH (4) 
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2184 
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2395 
2404 
24 16 
26 36 
2410 
2676 
2424 
2402 
2414 
2429 
2681 
2675 
2437 
2673 
244 4 
2694 
2705 
2669 
2658 
2662 
2666 
2272 
2292 
2285 
2278 
2556 
2701 
3015 
2733 
1874 
1899 
2835 
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433 
434 
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436 
437 





GENERAL UTILITY 


NAME 
ASMX2 
ASMX4 
ASMO1 
ASMO2 
ASMO3 
ASMO4 
ASMO5 
ASMO6 
ASM11 
ASM12 
ASM13 
ASM22 
ASM23 
ASM24 
ASM26 
ASM5 
ASM51 
ASM52 
ASM53 
ASM54 
ASM55 
ASM56 
ASM57 
ASM58 
ASM61 
ASM62 
ASM63 
ASM65 
ASM66 
ASM67 
ASM68 
ASM68A 
ASM70 
ASM71 
ASM72 
ASM73 
ASRD1 
ASRRX 
ASRR1 
ASRR2 
ASXX2 
AS68 
AVLID 
BADID 
BEGIN 
BITOO80 
BLK 


BUFPT 
B48 
B49 
B50 
B51 
B52 
B53 
B54 


P/N= 


CROSS~REFERENCE LISTING 


IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IW 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 


ATTRIBUTES AND REFERENCES 
aABDRESS. HEX LOCATION (00003282) 
ADDRESS. HEX LOCATION (00003278) 
2534 2555 
ARBRESS. HEX LOCATION (00002CFA) 
ADDRESS. HEX LOCATION (00002D62) 
ADDRESS. HEX LOCATION (00002E06) 
2190 2204 
ADDRESS. HEX LOCATION (00002E3E) 
jADDRESS. HEX LOCATION (00002E5E)- 
>ADDRESS. HEX LOCATION (00002E6E) 
ADDRESS. HEX LOCATION (0000321E) 
ADDRESS. HEX LOCATION (000032CC) 
j ADDRESS. HEX LOCATION (00002DE4) 
ADDRESS. HEX LOCATION (00002D88) 
2172 2174 2180 
ADDRESS. HEX LOCATION (00002D98) 
ADDRESS. HEX LOCATION (00002D58) 
jADDRESS. HEX LOCATION (00002D44) 
ADDRESS. HEX LOCATION (00003066) 
2228 2244 
ADDRESS. HEX LOCATION (00003086) 
ADDRESS. HEX LOCATION (000030B2) 
ADDRESS. HEX LOCATION (000033cA) 
ADDRESS. HEX LOCATION (0000309A) 
ADDRESS. HEX LOCATION (00003450) 
2672 2674 
aRDDRESS, HEX LOCATION (000030D2) 
ADDRESS. HEX LOCATION (0000307E) 
ADDRESS. HEX LOCATION (000030AA) 
ADDRESS. HEX LOCATION (000030E2) 
ADDRESS. HEX LOCATION (00003458) 
2636 2676 
oADDRESS. HEX LOCATION (0000344C) 
a ADDRESS. HEX LOCATION (000030FA) 
ADDRESS. HEX LOCATION (00003446) 
ADDRESS. HEX LOCATION (00003104) 
2431 2439 
ADDRESS. HEX LOCATION (00003472) 
2414 2428 2436 
ADDRESS. HEX LOCATION (000034 9E) 
2694 2729 
ADDRESS. HEX LOCATION (0000343A) 
2657 2661 2665 266 
ADDRESS. HEX LOCATION (00003418) 
ADDRESS. HEX LOCATION (00003424) 
ADDRESS. HEX LOCATION (00003430) 
ADDRESS. HEX LOCATION (00002EDC) 
2240 2447 
ADDRESS. HEX LOCATION (00002F24) 
2272 2290 
pARBRESS. HEX LOCATION (00002F0C) 
ADDRESS. HEX LOCATION (00002EF4) 
ADDRESS. HEX LOCATION (000032BC) 
2538 2540 2546 
ADDRESS. HEX LOCATION (00003492) 
ADDRESS. HEX LOCATION (00003910) 
492 2508 
ADDRESS. HEX LOCATION (00003506) 
398 2401 2406 
ADDRESS. HEX LOCATION (00002A02) 
ABSOLUTE. HEX VALUE (00000080) 
ADDRESS. HEX LOCATION (0000365C) IN 
2186 2795 2797 2799 2800 2811 
ADDRESS. HEX LOCATION (00002B5E) IN 
ABSOLUTE. HEX VALUE (00090010) 
2045 2952 2958 2971 2976 
ABSOLUTE. HEX VALUE (00000011) 
2036 2046 
ABSOLUTE. HEX VALUE (00090012) 
2047 2187 2411 2421 2510 
ABSOLUTE. HEX VALUE (00000013) 
2048 2864 2871 
ABSOLUTE. HEX VALUE (00000014) 
2049 2225 238 
ABSOLUTE. HEX VALUE (00000015) 
2050 2805 2878 
ABSOLUTE. HEX VALUE (00000016) 


6839424 EC=375222 
COPYRIGHT 

CSECT(I7AF9 ) LENGTH (6) 
CSECT(I7AF9 ) LENGTH(2) 
CSECT(I7AF9 ) LENGTH (6) 
CSECT(I7AF9  ) LENGTH(6) 
CSECT(I7AF9  ) LENGTH(6) 
CSECT(I7AF9 ) LENGTH(6) 
CSECT(I7AF9  ) LENGTH (6) 
CSECT(I7AF9 ) LENGTH (6) 
CSECT(I7AF9  ) LENGTH(2) 
CSECT(I7AF9 ) LENGTH (6) 
CSECT(I7AF9 ) LENGTH (6) 
CSECT(I7AF9 ) LENGTH(6) 
CSECT(I7AF9 ) LENGTH(6) 
CSECT(I7AF9  ) LENGTH (2) 
CSECT(I7AF9 ) LENGTH(2) 
CSECT(I7AF9 ) LENGTH(1) 
CSECT(I7AF9 ) LENGTH (4) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9  ) LENGTH (6) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9 ) LENGTH (4) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9  ) LENGTH (2) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9  ) LENGTH(4) 
CSECT(I7AF9  ) LENGTH (4) 
CSECT(I7AF9  ) LENGTH(2) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9  ) LENGTH (4) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9 ) LENGTH (6) 
CSECT(I7AF9 ) LENGTH (6) 
CSECT(I7AF9  ) LENGTH(6) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9  ) LENGTH(4) 
CSECT(I7AF9  ) LENGTH (6) 
CSECT(I7AF9  ) LENGTH (6) 
CSECT(I7AF9  ) LENGTH(6) 
CSECT(I7AF9 ) LENGTH(4) 
CSECT(I7AF9 ) LENGTH (2) 
CSECT(I7AF9  ) LENGTH(2) 
CSECT(I7AF9  ) LENGTH(2) 


CSECT (I7AF9 
2813 2815 


CSECT (I7AF9 


LENGTH (2 
2816 tc! 


) LENGTH (2) 


PAGE 12A 


IBM CORP 1976 











Ls G4 a eo a Sa 


~ oe ~~ 





sy es) tL A eS he ht ts a ay a RS Se 


I7AF9 --- GENERAL UTILITY P/N=6839424 FC=375222 PAGE 13 I7AF9 --- GENERAL UTILITY P/N=6839424 EC=375222 PAGE 138 
CROSS-REFERENCE LISTING COPYRIGHT IBM CORP 1976 CROSS-REFERENCE LISTING COPYRIGHT IBM CORP 1976 
DECLARED NAME ATTRIBUTES AND REFERENCES DECLARED NAME ATTRIBUTES AND REFERENCES 
438 B55 ABSOLUTE, HEX VALUE (00090017) 2794 2794 2795 2807 2811 2840 
2051 2426 2430 2434 2438 2649 2677 2092 FMSK ADDRESS. HEX LOCATION(00002C3E) IN CSECT(I7AF9 ) LENGTH(2) 
439 B56 ABSOLUTE. HEX VALUE (00000018) 2080 88 
2035 2734 FOURY ADDRESS. HEX LOCATION (00003508) IN CSECT(I7AF9 ) LENGTH(2) 
440 B57 ABSOLUTE. HEX VALUE (00000019) 2711 
2034 2035 FXD ABSOLUTE. HEX VALUE(00000018) 
444 B58 ABSOLUTE. HEX VALUE (0000001A) 2042 2079 246 
2054 2164 2175 2253 2275 2514 2535 2541 2557 409 F00021 ADDRESS. HEX LOCATION (0000257A) IN CSECT(I7AF9 ) LENGTH(1) 
442 B59 ABSOLUTE. HEX VALUE (00000018) 349 
2055 2170 2399 2536 2549 2562 2695 413 FO0545 ADDRESS. HEX LOCATION(0000258A) IN CSECT(I7AF9 ) LENGTH(1) 
443 B60 ABSOLUTE. HEX VALUE (0000001C) 362 
2033 421 F00560 ADDRESS. HEX LOCATION(000025B4) IN CSECT(I7AF9  ) LENGTH(1) 
44 B61 ABSOLUTE. HEX VALUE (000900 1D) 382 
2052 2262 2284 2317 2333 2685 HDCYL ADDRESS. HEX LOCATION (00003466) IN CSECT(I7AF9 _) LENGTH(2) 
44S B62 ABSOLUTE. HEX VALUE (00000018) 796 798 2069 2115 2128 2219 2229 2243 2516 
2053 2269 2291 2324 2339 2944 
835 CBOT7 ADDRESS. HEX LOCATION (000027AE) IN CSECT(I7AF9 ) LENGTH (2) 2823 HDR1 ADDRESS. HEX LOCATION (00003682) IN CSECT(I7AF9 ) LENGTH(2) 
8 36 CB15 ADDRESS. HEX LOCATION (000027B0) IN CSECT(I7AP9 ) LENGTH (2) 2832 HDR2 ADDRESS. HEX LOCATION (000036C6) IN CSECT(I7AF9 ) LENGTH(2) 
837 CB23 ADDRESS. HEX LOCATION (000027B2) IN CSECT(I7AF9 ) LENGTH (2) 2824 HDR3 ADDRESS. HEX LOCATION (00003684) IN CSECT(I7AF9  ) LENGTH(15) 
838 CB4O ADDRESS. HEX LOCATION (000027B4) IN CSECT(I7AF9  ) LENGTH(2) 2833 HDR4 jADDRESS. HEX LOCATION (000036C8) IN CSECT(I7AF9 ) LENGTH(34) 
472 CE {BBSOLUTE. HEX VALUE (0000002A) 2826 HDRS ADDRESS. HEX LOCATION (00003696) IN CSECT(I7AF9 ) LENGTH (2) 
447 CH jARSOLUTE. HEX VALUE (00000018) 2827 HDR6 ADDRESS. HEX LOCATION (00003698) IN CSECT(I7AF9 ) LENGTH(19) 
557 CICB ABSOLUTE. HEX VALUE (00000014) 2829 HDR7 ADDRESS. HEX LOCATION(000036AE) IN CSECT(I7AF9  ) LENGTH(2) 
654 CLDCB ADDRESS. HEX LOCATION (0000263C) IN CSECT(I7AF9 ) LENGTH (2) 2830 HDR8 >ADDRESS. HEX LOCATION (000036B0) IN CSECT(I7AF9 ) LENGTH(19) 
812 CNVT1 ADDRESS. HEX LOCATION (00002752) IN CSECT(I7AF9 ) LENGTH (6) 2684 HEADS ADDRESS. HEX LOCATION (00003464) IN CSECT(I7AF9  ) LENGTH(2) 
814 CNVT2 ADDRESS. HEX LOCATION (0000275A) IN CSECT(I7AF9 ) LENGTH (6) 1903 HEBLK ADDRESS. HEX LOCATION (00002B66) IN CSECT(I7AF9 ) LENGTH(2) 
820 CNVT3 ADDRESS. HEX LOCATION (00002772) IN CSECT(I7AF9 ) LENGTH(6) 61 HEX ABSOLUTE. HEX VALUE (00000001) 
822 CNVT4 ADDRESS. HEX LOCATION (0000277A) IN CSECT(I7AF9  ) LENGTH(6) 563 HTOE ABSOLUTE. HEX VALUE (00000018) 
828 CNVTS ADDRESS. HEX LOCATION (00002792) IN CSECT(I7AF9 ) LENGTH (6) 539 IDLE ABSOLUTE, HEX VALUE (00000002) 
829 CNVT6 ADDRESS. HEX LOCATION (00002798) IN CSECT(I7AF9  ) LENGTH(6) 3022 ID00 ADDRESS. HEX LOCATION (00003F14) IN CSECT(I7AF9  ) LENGTH(4) 
7197 80 811. 813. 819 21. 827 765 897 2218 2367 2403 2699 2786 2787 
8 33 CNVT8 ADDRESS. HEX LOCATION(000027AA) IN CSECT(I7AF9 ) LENGTH(4) 3054 ID20 ADDRESS. HEX LOCATION (00003F94) IN CSECT(I7AF9 ) LENGTH(4) 
791 2227 2229 2231 2234 2235 2242 2243 °2410 2413 
832 CNVT9 ADDRESS. HEX LOCATION(000027A6) IN CSECT(I7AF9 ) LENGTH(4) 2724 
807 815 823 465 IN ABSOLUTE. HEX VALUE (00000023) 
791 CONVT ADDRESS. HEX LOCATION (0000270A) IN CSECT(I7AF9 ) LENGTH(4) 1575 1587 1708 
2110 2149 2251 2273 ° 2460 2520 2941 2037 INC ABSOLUTE. HEX VALUE (00000016) 
470 CS ABSOLUTE. HEX VALUE (00000028) 2041 2621 2630 
1557 1560 1668 1709 1738 1770 INTBL ADDRESS. HEX LOCATION (0000295A) IN CSECT(I7AF9  ) LENGTH(2) 
471 CSA ABSOLUTE. HEX VALUE (00000029) 1805 
1743 1665 INTER ADDRESS. HEX LOCATION(000028BE) IN CSECT(I7AF9 ) LENGTH(2) 
501 CSBUF ADDRESS. HEX LOCATION (000025FA) IN CSECT(I7AF9  ) LENGTH(1) 1772 
699 1568 1674 INTES ADDRESS. HEX LOCATION(000028D6) IN CSECT(I7AF9 ) LENGTH(2) 
692 CSDCB ADDRESS. HEX LOCATICN(0000267C) IN CSECT(I7AF9  ) LENGTH(2) 1669 
1558 1678 INTET ADDRESS. HEX LOCATION(000028DE) IN CSECT(I7AF9 ) LENGTH(2) 
506 CSTL5 ADDRESS. HEX LOCATION (00002602) IN CSECT(I7AF9  ) LENGTH(2) 1675 
2073 2077 1705 INTOK ADDRESS. HEX LOCATION(000028E2) IN CSECT(I7AF9 ) LENGTH(2) 
507 CSTL6 ADDRESS. HEX LOCATION (00002604) IN CSECT(I7AF9  ) LENGTH(2) 1771 
2156 2181 2203 2364 2527 2547 63 INTRNL ABSOLUTE. HEX VALUE (00000000) 
2840 DATAA ADDRESS. HEX LOCATION (000036F4) IN CSECT(I7AF9 ) LENGTH(2) 365 385 
2802 2818 1727 INTRX ADDRESS. HEX LOCATION(00002912) IN CSECT(I7AF9 ) LENGTH(2) 
491 DCBUF ADDRESS. HEX LOCATION(000025EA) IN CSECT(I7AF9 ) LENGTH(1) 1722. 1725 
1563 1708 INTR1 ADDRESS. HEX LOCATION(000028EA) IN CSECT(I7AF9 ) LENGTH(2) 
492 DCB1 ADDRESS. HEX LOCATION (000025EA) IN CSECT(I7AF9 ) LENGTH(2) 1673 1677 1679 
2966 1713 INTR2 ADDRESS. HEX LOCATION(000028F8) IN CSECT(I7AF9 ) LENGTH(1) 
1895 DC2PT ADDRESS. HEX LOCATION(00002B60) IN CSECT(I7AF9  ) LENGTH(2) 1710 
864 1721 INTR3 ADDRESS. HEX LOCATION (00002906) IN CSECT(I7AF9 ) LENGTH(2) 
105 DEVADD ADDRESS. HEX LOCATION (000019D0) IN CSECT(I7AF9 ) LENGTH(1) 1718 
521 1761 1770 1870 1761 IOBLK ADDRESS. HEX LOCATION(0000294E) IN CSECT(I7AF9 ) LENGTH(2) 
486 DEV1 ADDRESS. HEX LOCATION(000025E2) IN CSECT(I7AF9 ) LENGTH(2) 1576 1810 
490 1802 1763 ITODCB ADDRESS. HEX LOCATION (00002952) IN CSECT(I7AF9 ) LENGTH(2) 
488 DEV3 ADDRESS. HEX LOCATION(000025E6) IN CSECT(I7AF9 ) LENGTH(2) 882 885 888 895 906 09 912 915 918 
3007 927 924 1558 1564 1809 2379 
489 DEV4 {BDDRESS. HEX LOCATION (000025E8) IN CSECT(I7AF9 ) LENGTH(2) 1764 TOMOD ADDRESS. HEX LOCATION (00002954) IN CSECT(I7AF9 ) LENGTH(2) 
643 DGDCB ADDRESS. HEX LOCATION(0000262C) IN CSECT(I7AF9 _) LENGTH(2) 37 I7AF9 CSECT. START(00002500) LENGTH(6850) ESDID(1) 
924 926 2239 2252 ° 2255 2256 2257 2263 2264 37 
2274 2277 2278 2279 2285 2286 2418 2444 773 LG SEC ADDRESS. HEX LOCATION (000026F6) IN CSECT(I7AF9  ) LENGTH(2) 
2094 DMSK ABDRESS. HEX LOCATION (00002C42) IN CSECT(I7AF9 ) LENGTH (2) ALE 5833 2970 2136 2137 2214 2238 2417 2445 
67 DUMMY ABSOLUTE. HEX VALUE (00000000) 1880 LINE1 ADDRESS. HEX LOCATION (00002A3A) IN CSECT(I7AF9 ) LENGTH (40) 
2753 END ADDRESS, HEX LOCATION (0000352a) IN CSECT(I7AF9  ) LENGTH(2) 485 LSTIO ADBRESS. HEX LOCATION (000025E0) IN CSECT(I7AF9  ) LENGTH(2) 
387 ENTPT ADDRESS. HEX LOCATION (00002570) IN CSECT(I7AF9  ) LENGTH(1) 2757 MESS ADDRESS. HEX LOCATION (00003532) IN CSECT(I7AF9  ) LENGTH(2) 
47 EQ ABSOLUTE. HEX VALUE (00000000) 2769 MESSE ADDRESS. HEX LOCATION (000035C8) IN CSECT(I7AF9 ) LENGTH (2) 
463 ER ABSOLUTE, HEX VALUE (00000021) 2770 MESSF ADDRESS. HEX LOCATION(000035CA) IN CSECT(I7AF9 ) LENGTH(29) 
1574 1595 1678 1720 1745 2067 2122 2132 2154 2769 
2160 2168 2179 2201 2211 2222 2260 2267 2282 2758 MESS1 ADDRESS. HEX LOCATION (00003534) IN CSECT(I7AF9  ) LENGTH(33) 
2289 2301 2307 2315 2322 2331 2337 2348 2354 2757 
2383 2474 2502 2506 2525 2531 2545 2553 2569 2760 MESSY ADDRESS. HEX LOCATION (00003556) IN CSECT(I7AF9  ) LENGTH(2) 
2574 2585 2592 2703 2716 2727 2783 2868 2916 2746 
2921 2925 2930 2950 2962 2761 MESS5 ADDRESS. HEX LOCATION (00003558) IN CSECT(I7AF9 ) LENGTH(26) 
2390 ER22 ADDRESS. HEX LOCATION (00003062) IN CSECT(I7AF9  ) LENGTH(4) 2760 
2349 2355 2365 2405 2763 MESS6 ADDRESS. HEX LOCATION(00003574) IN CSECT(I7AF9 ) LENGTH(2) 
543 EXIT ABSOLUTE. HEX VALUE (00000006) 2749 
1727 2764 MESS7 ADDRESS. HEX LOCATION (00003576) IN CSECT(I7AF9  ) LENGTH(44) 
2090 EXIT2 ADDRESS. HEX LOCATION (00002C3A) IN CSECT(I7AF9 ) LENGTH(4) 2763 
2100 2102 2766 MESS8 ADDRESS. HEX LOCATION(000035A4) IN CSECT(I7AF9 ) LENGTH(2) 
1897 FAKETU ADDRESS. HEX LOCATION(00002B64) IN CSECT(I7AF9  ) LENGTH(2) 2752 
1863 2767 MESS9 ADDRESS. HEX LOCATION(000035A6) IN CSECT(I7AF9 ) LENGTH(32) 
2036 FD ABSOLUTE. HEX VALUE (00000011) 2766 
2043 2064 2237 2478 462 MI ABSOLUTE. HEX VALUE (00000020) 
2686 FGSEC ADDRESS. HEX LOCATION (00003468) IN CSECT(I7AF9 ) LENGTH(2) 1723 
2215 2034 MINC ABSOLUTE. HEX VALUE (00000019) 
2842 FILL ADDRESS. HEX LOCATION(000036F8) IN CSECT(I7AF9 ) LENGTH(51) 2040 2609 2617 2619 
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ADDRESS. HEX LOCATION (000019C4) IN 
Pe HEX LOCATION (00003626) IN 

aa HEX LOCATION (0000362E) IN 
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925 928 
1630 1631 
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2467 2708 
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2154 2160 
2211 2222 
2269 2275 
2317 2322 
2383 2385 
2441 2462 
2525 2531 
2562 2569 
2617 2619 
2727 2783 
2921 2925 
926 928 
1716 «1717 
1861 2368 
2967 2969 
1744 1752 
1859 2030 
2166 2177 
2224 2240 
2299 2305 
2346 2352 
2428 2429 
2477 2481 
2567 2572 
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2669 2670 
2725 2781 
2908 2909 
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1565 1569 
1852 1855 
2460 2520 
2797 2802 
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CSECT (I7AF9 
CSECT (I7AF9 
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2173 2184 
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8 

LENGTH (4) 
LENGTH (6) 
LENGTH (6) 
LENGTH (4) 
LENGTH (6) 


NONE 


awh 


LENGTH (2) 
LENGTH (2) 
LENGTH (2) 
LENGTH (2) 


3 


LENGTH (2) 
LENGTH (2) 
LENGTH (2) 
LENGTH (2) 
LENGTH (2) 
LENGTH (2) 
LENGTH (2) 
LENGTH (2) 
LENGTH (6) 


w 


LENGTH (1) 
LENGTH (6) 
LENGTH (4) 
LENGTH (6) 


Ks A 8S OD Ss 


LIAFS === 


DECLARED 
2813 
2820 
2960 
2948 
2564 

100 


92 
519 
74 
75 
2457 
2027 
2444 
2448 
2462 
2471 
2472 
2483 
2476 
2490 
2598 
2615 
2617 
2604 
2619 
2606 
2626 
2630 
2613 
2624 
2628 
2607 
2134 
2740 
714 


3004 
771 
736 


3016 
3017 
703 


2898 
2936 
2904 
2906 

775 


2356 
2343 
659 


466 





GENERAL UTILITY 


NAME 
TND69X 
TD69Y 
TTSKE 
TTSK1 
TT708 
TUINPT 


TUMSGWTR 
TURTN 
TUSTATUS 
TUWORK 
T0253 
T7AAA 
T701 
T702 
T703 
T7033 
T704 
T7044 
T706 
T7066 
T709 
T710 
T711 
T712 
7713 
T714 
T715 
T716 
T717 
T718 
T719 
T720 
T99C 
T99K 
VRDCB 


WB2 
WDATA 
WKDCB 


WRBUF 
WRBUF1 
WRDCB 


WRRD 

WRRD1 
WRRD4 
WRRDS 
WRSID 


WRT WX 
WRTW2 
WSDCB 


XE 


ATTRIBUTES AND 


“ 
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CROSS~REFERENCE LISTING 


REFERENCES 


jADDRESS. HEX LOCATION (00003662) IN 
ADDRESS. HEX LOCATION (0000367C) IN 
ADDRESS. HEX LOCATION (00003890) IN 
2951 2977 
ADDRESS. HEX LOCATION(0000386A) IN 
ADDRESS. HEX LOCATION (000032DC) IN 
ADDRESS. HEX LOCATION (09001948) IN 
2061 2062 2069 2070 2080 2082 
2099 2101 2103 2108 2111 2118 
2185 2188 2193 2239 2396 2398 
2446 2654 2658 2662 2666 2851 
2906 2940 2999 3000 
{ADBRESS. HEX LOCATION (000018BA) IN 
ADDRESS. HEX LOCATION(O0COQ0261C) IN 
1872 2027 
ADDRESS. HEX LOCATION (00001818) IN 
ADDRESS. HEX LOCATION(0000181A) IN 
1845 1846 1847 1849 190 
> ADDRESS. HEX LOCATION (00003146) IN 
ADDRESS. HEX LOCATION(00002B6C) IN 
ADDRESS. HEX LOCATION (0000310C) IN 
2230 2233 
ADDRESS. HEX LOCATION (00003122) IN 
ADDRESS. HEX LOCATION(00003162) IN 
2614 2629 
a hDDRESS. HEX LOCATION (0000317C) IN 
ADDRESS. HEX LOCATION (00003182) IN 
2463 2470 2486 
ADDRESS. HEX LOCATION (000031A0) IN 
ADDRESS. HEX LOCATION (0000318C) IN 
jRDDRESS. HEX LOCATION (000031B2) IN 
ADDRESS. HEX LOCATION (00003358) IN 
2482 2484 
> ADDRESS. HEX LOCATION (00003396) IN 
ADDRESS. HEX LOCATION (0000339A) IN 
2601 2603 
ADDRESS. HEX LOCATION(00003370) IN 
2616 2618 
oRRDRESS. HEX LOCATION (0000339E) IN 
ohDDRESS. HEX LOCATION(00003374) IN 
jADDRESS. HEX LOCATION(000033B0) IN 
jADDRESS. HEX LOCATION (000033C4) IN 
oRBDRESS. HEX LOCATION (0000338C) IN 
ADDRESS. HEX LOCATION (000033A8) IN 
2620 262 
aARDRESS. HEX LOCATION (000033BA) IN 
5 ADDRESS. HEX LOCATION(0000337A) IN 
> ADDRESS. HEX LOCATION(00002CD4) IN 
ADDRESS. HEX LOCATION(0000350E) IN 
2123 2133 
ADDRESS. HEX LOCATION (0000269) IN 
3398 2191 2192 2195 2196 2197 
ghbDRESS. HEX LOCATION (000038F2) IN 
ADDRESS. HEX LOCATION (009026F2) IN 
2999 3000 3001 3001 3004 
ADDRESS. HEX LOCATION (000026BC) IN 
918 2127 2128 2129 2377 2564 
2707 2713 27 
ADDRESS. HEX LOCATION (00003914) IN 
2059 2312 2344 2937 2964 2565 
ADDRESS. HEX LOCATION (00003A14) IN 
2318 2351 
ADDRESS. HEX LOCATION (0000268C), IN 
912 2059 2297 2298 2303 2304 
2351 2576 2577 2578 2579 2581 
2591 2639 2643 2671 2901 2904 
2910 2911 2918 2932 
5 ADDRESS. HEX LOCATION (000037A0) IN 
ADDRESS. HEX LOCATION (00003830) IN 
2869 2917 2922 2926 2931 
a ADDRESS. HEX LOCATION (000037BA) IN 
> ADDRESS. HEX LOCATION (000037C6) IN 
ADDRESS. HEX LOCATION (000026FA) IN 
666 743 2108 2109 2117 2129 
2497 2498 2508 2509 2512 2513 
jADBRESS. HEX LOCATION (O0002FEE) IN 
> ADDRESS. HEX LOCATION(00002FBE) IN 
ADDRESS. HEX LOCATION (0000264C) IN 
921 2114 2115 2116 2117 2494 
2556 2560 2561 2564 2697 2698 
2719 2721 2722 
ABSOLUTE. HEX VALUE (00000024) 


CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 


CSECT (I7AF9 
2084 2086 
2125 2134 
2418 2444 
2852 2861 


CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT(I7AF9 


CSECT (I7AF9 
2200 2206 


CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 


2565 2566 
CSECT (I7AF9 
2967 3003 
CSECT (I7AF9 
CSECT (I7AF9 
2344 2345 
2582 2587 
2906 2907 


CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
2139 2493 

2559 2561 

CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
2495 (2496 

2699 2700 


EC= 
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) LENGTH (4) 
) LENGTH (4) 
) LENGTH (4) 
) LENGTH (4) 
) LENGTH (6) 
LENGTH (1) 


NONIRIN 
Ofrao 
wracw~” 
WNE CO 


) LENGTH (1) 
) LENGTH (2) 
) LENGTH (1) 
) LENGTH (1) 
) LENGTH (6) 
) LENGTH (4) 
) LENGTH (6) 
) LENGTH (4) 
) LENGTH (2) 
) LENGTH (6) 
) LENGTH (4) 
) LENGTH (4) 
) LENGTH (4) 
) LENGTH (6) 
) LENGTH (6) 
) LENGTH (2) 
) LENGTH (2) 
) LENGTH (2) 
) LENGTH (2) 
) LENGTH (6) 
) LENGTH (6) 
) LENGTH (2) 
) LENGTH (6) 
) LENGTH (6) 
) LENGTH (6) 
) LENGTH (2) 
) LENGTH (6) 
) LENGTH (4) 
ao h7 LENGTH (2) 


) LENGTH (4) 
) LENGTH (2) 


) LENGTH (2) 
2706 


) LENGTH (2) 
) LENGTH (2) 
| LENGTH (2) 


2350 
2588 
2909 

) LENGTH (4) 

) LENGTH (4) 

) LENGTH (6) 

) LENGTH (6) 

) LENGTH (2) 
2496 
2565 

) LENGTH (4) 

) LENGTH (4) 

LENGTH (2 

2ub9 a 
2712 
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DECLARED 


“eu 
1550 


1736 
1743 
1753 
1558 
1745 
1756 
1629 
1562 
1575 
1587 
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GENERAL UTILITY 


NAME 


XI 
XIO 


XTOCK 
XIOCO 
XITOCQ 
XIOCS 
XIOCV 
XITOCX 
XI OER 
XIO1 

XIO2 

XI 08 

ZEROO 


ADDRESS. 
1741 

ADDRESS. 
1750 

ADDRESS. 


1754 2071 


ADDRESS. 
1739 
ADDRESS. 
1746 
ADDRESS. 
1762 
A 
1551 
ADDRESS. 
561 
ADDRESS. 
1594 
ADDRESS. 
2490 


DDRESS. 
1554 


PD Ly 


P/N= 
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CROSS-REFERENCE LISTING 
ATTRIBUTES AND REFERENCES 


HEX VALUE (00000022) 
HEX LOCATION (00002840) IN CSECT(I7AF9 
893 900 907 10 913 916 


HEX 
HEX 
HEX 
HEX 
HEX 
HEX 
HEX 
HEX 
HEX 
HEX 
HEX 


LOCATION (00002914) 
LOCATION (00002926) 
LOCATION (0000293C) 


LOCATION (00002852) 
362 


LOCATION (0000292A) 
LOCATION (0000294 8) 
LOCATION (000028B2) 
LOCATION (00002862) 
LOCATION (00002888) 
LOCATION (0000289E) 
LOCATION (000026EC) 


IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
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CSECT(I7AF9 
CSECT (I7AF9 
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CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
CSECT (I7AF9 
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LENGTH (4) 


LENGTH (2) 
LENGTH (2) 
LENGTH (4) 
LENGTH (6) 
LENGTH (2) 
LENGTH (4) 
LENGTH (2) 
LENGTH (4) 
LENGTH (2) 
LENGTH (2) 
LENGTH (2) 


Me Ee ee 2 a a 2 I ee ke ok ot it i kk ak fk KK ok ok tk tk 


